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/VHCRODIGIML 



INTRODUCAO 



A disseminacofa do computadar e hoje Lima tend&ncia irre- 
versivel. Na"o esta longe o dia em que o computador sera ta'a 
comum e ainda mais imprescindi vel do que atualmente e o 
telef one. 



Este manual tern a -final idade de introduzi-lo na opera- 
c3o do TK-2000 COLOR. No primeiro capitulo sKo apresentados 
alguns conceitos gerais de computac&o necessarios no decor- 
rer do manual. segundo capitulo descreve especi f icamente o 
computador TK-2000 COLOR. Ob demais capltulos se re-ferem ao 
uso da linguagem BASIC em nosso equipamento. 



No final de cada capitulo ha um item denominado "FACA 
SEU RESUMO"., composto de varias questdes para voce comple- 
tar. Para permitir ver i f i cac&o, as respostas s&o f ornecidas, 
apos a ultima quest^o. "FACA SEU RESUMO" tern dupla 
util idade. A primei ra e, ap6s a leitura do capitulo,, quando 
voce devera ent&o completar as questcies, veri-ficar se o 
capitulo foi bem compreendido; caso voce sinta di-ficuldade 
em completar as questcies procure reler os pontos de duvi das 
do capitulo. A segunda utilidade e, ap&s- a le-itura completa 
do manual , servir de consult a rapida, ou seja, se durante a 
operaea*o do TK-2000 COLOR surgir alguma di-ficuldade,, prova- 
velmente voce encontrara a resposta num dos Itens "FACA Q 
SEU RESUMO", uma vez que eles reunem os aspectos mais rele- 
vantes de cada capitulo. 



Ainda assim, na'o se contente apenas com a leitura deste 
manual. Somente sen interesse, sua pratica e pesquisa ira'o 
torni-lo um habil operador desta maquina do -futuro 
- Computador TK-2000 COLOR- . 



Antes de continuar, lei a atentamente o Manual de 
InstalacSo do TK-2000 COLOR. 



E proibida a reproducl(o total 

on parcial deste manual sent 

previa autorizac&o por escrito 

da 

MICRODIGITAL ELETRONICA LTDA. 
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CAPITULO I : COMPUTADOR 
1 . 1 . D QUE E COMPUTADDR 

Antes de iniciarmos a operafSo do computador TK— 2000 
COLOR, convem sabermos d que e um computador. 

Inici al mente, podemoe comparar o computador a Lima cria- 
tura que, apesar de nSo ter urn mini mo de criatividade ou 

capacidade de deduc'So, estando com as lnstructies minuciosas 
e corretas nas tripos, e capaz de realizar servicos com extre- 
me rapidez e precis=(o. Porem, note bem, ele n^o e capaz de 
fazer absoi u.t amente nada que n^o estej a nas instrucftes pre- 
determi nadas. 

Seria praticamente impossivel descrever todos os tipos 
de aplicaca"o de urn computador, porem al guma del as sa'o: 

-ARQUIVQ DE DADOS: urn computador e capaz de arma2enar uma 
enorme quantidade de dados e, quando necessario, 
apresenta-105 rapidamente. 

-CONFROLE DE PR0CES30: Esta apli cacao e bastante ampl a, e 
pode ir desde a control e de maquinas operatr i 2es» 
at^ a unoni toraca"a de pacientes cardiacos. 

-CALCULOS COMPLEXOS: A es-iecuca'o de calculos repetitivos e 
uma das maiores utilidades do computador na Area de 
projetos e pesquisas. 

-CONTROLES ADMINISTRA'T I VOS: Sao poucas as empresas que, 
hoje em dia, nSo dispdem de urn computador para 
executar suas folhas de pagamento, control e de 
estoque, mala direta, etc. 

-EDUCACAO: Nesta area, o uso do computadoi e relat i vamente 
recente no Brasil, porem muitas de nossas criancas 
ja brincam entusi asmadas com a matematica e ci&ncia 
da computaca'o, bem como em outras areas de 
conhecimento atraves dos comput adores. 

-LAZER:Os jogos realizados atraves do computador esteto se 
expandindo a cada dia. Muitas -familias j£ passam 
horas divertido-se diante de uma destas maquinas. 



1.2. COMPUTADOR PESSOAL 

computador e urn equi pamento que possue uma gama 
e>! tremamente variada de capacidade e preco. Dentro desta 
variedade, encontramos o computador pessoal que, embora de 
urn preco acessivel e capacidade restrita, e capaz de repro- 
duzir quase tudo que um computador de maior porte -faz. 
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Di'wl.a -forma, urn computador pessoal na'o e capaz de 
Mr (|ii 1 vi'Ai'' as fichas de todos ds pacientes do Hospital das 
< I Inn ft*, mas pode armazenar os arquivos necessarios a urn 
i iiiiwtiil I or J. o particular, au as receitas culinarias de uma 
don HI din:* cassa. Ele pode tambem executar controles administra- 
I I vim, dumesticos, ou ate de pequenas empresasj auxiliar no 
piimlnoi r? proporcionar haras de apaixonante laser. 



1.3. AS PARTES DE UM COMPUTADOR 

Afialisando de forma simpl i-f icada, as -partes que compftem 
Mm i i unputador sa"o: Memiria, Unidade Central de Processamento 
(II.C.F'.), Entrada e Saida. Estes elementos se interagem 
i i hi I f ii' ■ mi? esquematiza a figura 1.1. 



MEMORIA 



I 



ENTRADA 



* 



UCP 



* 



SAIDA 



Fig. I . 1 

I'lMlPinits fazer uma analogia entre o computador e urn escrito- 
i in. A Entrada corresponde a recepcionista, ao receber os 
pttdldavl a Memoria, 5 pessoa que cuida do arquivo; a LLC. P. 
.411 ( hrl'if do escritorio ? que alem de dar ordens, possue uma 
mAquinn de calcular; a Saida ao entregador., que leva os 
rwBiil t.ados ao clients. A figura 1.2 i lustra o nosso exemplo. 



fKCEPCAo 



* 



ARQU1VISTA 




ENCARREGADO 



* 



MENSAGEIRO 






I U • 1.2 
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Ma sequ^ncia desse item o exemplo desta 
melhor compreendi do. 



■f i gura 



1.3.1. Memoria 



diz ao chefe 
■fornecendo uma 



A memoria e o elernento que per mite? ao computador arma- 
zenar ou reter as in-f or mattes . Podemos dividir as in-forma- 
0S5 em dois grupos, as instrucdes e os dados.. 

As instruffies dizem ao computador o que -fazer. No 
exemplo da -fig. 1.2, quando o ar qui vista 
"Calcular a divida de Antonio",, ele esta 
i nstru^cto. 

Pode-se entender por dados c:omo sendo a materia prima e 
o produto do computadDr, ou seja,, a finalidade em si do 
contputador e recebar determinados dados, executar algum tipo 
de processainento sobre os mesmos e» quando solicitado, for- 
necer determinado resultado. Em nosso exemplo, os dados de 
entrada est So na "ficha do Antonio" e o dado de saida e o 
t ot a 1 da divida. 

Cada i nf ormaca'o da memdria esta armazenada em urn local 

determinado, chamado "endereco" ou "posicefo" da memdria. 

Podemos imaginar a memdria como um con junto de caixas do 

.correiOj, correspondendo a etiqueta de cada uma destas cai^as 

aos enderecos e, o cnnte&do del as a i n-f ormaccto. 



ENDERECO 
DA MEMdRtA 

F i g . 1.3 




INFORMAQAO 



As memfirias podem ainda serem divididas em duas -faml- 
lias basicas: ROM (Read Only Memory), sSo memirias com 
i n-formaco'es fix as, ou seja, na"o se pode alter ar o conteado 
dm cada um de seus enderecos. Estas memdrias contem in-forma- 
f:bes de controls utilizadas para o prdprio f unci onamento do 
computadqr. 
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RAM (Random flcess Memory), estas memoriae permitem a 
alter a^&o do seu conteudo, parem, quando o computador e 
dwnligado, todas as memorias deste tipo sKo apagadas, sendo 
dfnteJO perdidas as in-formac&es nelas armazenadas. Nestas 
memfirias sa"a tambem armasenadas in-Farmac £)es f ornecidas' pelo 
oper"adar aa coraputador , 



1.3.2. LLC. P. 



A Unidade Central 
"cerebro" do si sterna, 
■functtes de control e 
escrit&rio, quando o 
proKima tare-fa", pede 



de Processamento e onde se encontra o 
Suas fun^aes podem ser divididas em 
e aritmeticas. Mo BKemplo do nosso 
chefe pergunta ao ar qui vista "Qual a 
a ficha do Antfinio e ■fala para avisar 
o entregador da total da divida, ele esta e^ercendo suas 
funcoes de controls. A maquininha de calcular do chefe, 
atraves do qual ele encontra total da divida corresponde a 
fun^So (oli unidade) aritmetica, 

Pode-se dizer que a U.C.P., e a unidade mais complexa, 
oli a propria alma do computador. H£ algumas decadas atras, 
esta unidade, bem como todo o computador;, eram -feitos com 
componentes eletrflnicos discretos Walvulas oli transi stores) 
e ocupavam urn grancje espaco. Hoje, graeas ao desenvol vi mento 
da tecnica denominada L.S.I. <Large Scale Integration), 
unidades muito mais e-Fi cientes que as antigas oczupam uma 
hr<sa aprowimada de 10 cm2, com apenas alguns mllimetros de 
altura. A U.C.P. do nosso computador TK--2000 CDLDR 1 
apresentada na figura 1.4. 




Fig. 1.4 



1.3.3. Entrada 



A entrada de urn computador, representada em n eraser -ex em- 
plo pela recepcionista, £ o elemento que recebe as informa- 
^cfes (dados e instrucoes) e as transmite para a memoria, 
Existem- diversas -formas de se executar esta entrada como 
atraves de fitas perfuradas, cartftes etc.? por&m as mais 
comuns e praticas sHo utilizadas pelo TK-2000 COLOR que sa"o 
o teClado (geralmente semelhant.es ao de uma mAquina de 
escrever), e tambem o disco magnetico e -fita cassete (estes 
opcionais) atraves do qual voc£ entrara com instrucBes e/ou 
dados. 



1.3.4. Salda 

Assim como no caso do entregador do nossa escritorio, a 
salda e que transmits ou apresenta os resultados do proces- 
samento -feito pelo computador. Alguns dos tipos de equipa- 
mento de salda do TK-2000 COLOR sSa: irapressora, terminals 
de video e tela de televisSo . 



1.3.5. Memoria Auxiliar 

A Memoria Auxiliar na*o entrou em nosso exemplo par n&a 
•fazer parte intrlnsica do computador, ou seja, ele pode 
aperar sem esta unidade, se bem que estejam limitadas as 
possi bi 1 i dades de aplicasa'o. 

Mesmo para a execut^o de uitia operat^So rel at i vamente 
simples, geraJmente a computador necessita de urn numero 
bastante grande de instrufftes e dados, Estes sa"o armazenados 
nas mernarias RAM do computador (que como ja dissemos, perdem 
sett cont.eG.da quando o equl pamento e desligado). Para que 
estes nSc se percam, eles padem ser gravados ■ na Memferia 
Auxiliar e assim, quando necessetrio, requisitados novamente 
pelo computador. Port an to a Memaria Auxiliar e uma unidade 
capa:? de reter urn grande nCimero de i n-f ormaftes, independents 
do computador estar ou nao desligado. 

Computador TK-2000 COLOR usa para esta finalidade urn 
gravadar cassete. Note que em uma unica fit a cassete, pode- 
se gravar instructs e dados relativos a muitas operacbes. 
A3, em do mais, el as podem ser adquiridas ja com i n-f ormacaes 
gravadas, para execucSo de determi nadas tare-fas, assim como 
se pode c.Qmpra.r uma fita com m&si ca ja gravada. 

Outro tipo de mem&ria auxiliar e a unidade de discos 
que e urn equi pamento opcional do TK-2000 COLOR. 



1.4. SISTEMA DE NUMERA£fiO BINARIO 

Normalmente, para executar nossos calculos, utilizamos 
o sistema de numeraca'o decimal , que e formada atrav&s da 
combinaca'o de dez simbolos diferentes (0 a 9). 

Por que dez e n&o oito ou vinte simbolos diferentes? 
Provavelmente devido ao numero de dedos das nossas mSfos, 
poi s nada impede que se adote urn n&mero maior ou menor de 
simbolos, para um determi nado sistema de numerac&o, 

Ds sistemas internos de numeraca'o dos computadores usam 
apenas dois simbolos, ou seja F trabalham em base binaria ao 
inves da base decimal. Estes dais simbolos podem s«*r repre- 
sentados por e 1, Sim ou W«(a» uma l&mpada apagada ou 
acesa, ujtta chave ligada ou desligada, uma tensSo de 5 v"oits 
ou Volts. Vej a na tabela a seguir a correspondenci a entre 
os 21 primeiros numeros na base binaria s na base decimal (& 
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tabela pode continuar i ndef inidamente) 



BASE EI WAR I A 



BASE DECIMAL 



BASE BIIMARIA 



BASE DECIMAL 



00090000 
0000000 1 
00000010 

00000100 

0000010] 

0000011.0 
00000111 
0000 1 000 

00001001 

00001010 



C) 



U 



00001011 

00001100 
00001101 
00001110 
00001111 

000 1 0000 

00010001 
00010010 
00010011' 
00010100 

00010101 



|| 

13 

14 
15 

1 
18 
19 
20 
21 



Tabel a L 1 



D motive da uti 1 i za^eto dos numeros binarios no 
eomputador e que, para ele £ muito mais facil trabalhar com 
chaves abertas ou -fechadas, preserifa ou n^o de tensKo e 
lSrnpadas acesas on apagadas, do que com dez di-ferentes 
simbolos. For exempla, uma salda rudimsntar de urn sistema de 
camputafSa pade ser ■feito a parti r de l&mpadas. 



o o o # 

io c c o o 5$ 

& o o o 

o 



Fig. I ■ 5 



## 



/ 

9 
8 
3 



Note que j a base binaria per mi te os mesmos 
oper adores da base decimal. 



tipos de 



Exemplar 



010 - 2 
100 m 4 



110 m 6 

Urn aprendizado mais profunda das operavfles na base 
binaria" pode ser obtido atraves do estudo da Algebra 
Bool eana. 

Para ■fecharmos este item, & importante sal ientarmos 
duas des-f inicfres muito usadas na computacSo: bit e byte. 
bit e definido como urn elemento da memaria que pode ter duas 
situa^Qes complementares: 1 e 0, aim ou na"o, ligado ou 
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desligado, etc, 
1.6) . 



D byte e o cohjunto formado por 8 bits, (fig 



BYTE 


BIT 7 


BIT 6 


BIT 5 


BIT 4 


BIT 3 


BIT 2 


BIT 1 


BIT 


0/1 


0/1 


0/1 


0/1 


0/1 


0/1 


0/1 


0/1 



obs. 0/1 significa ou 1 



Fig. 1.6} 



Assini um con junto de 8 lampadas pode representar urn 
byte, no qual cada l&mpada representa um bit. 

GBSERVACAO: um termo tambem muito comum na computacao e o 
ch«/riadD quilo byte ou simplesmente KByte, que corresponde a 
1024 bytes. Assim: 



1 K bytes 
4 K bytes 
8 K bytes 
16K bytes 



= 1 x 1024 bytes 

== 4 x 1024 bytes 

= 8 n 1024 bytes 

= 16 H 1.024 bytes 



= 1024 bytes 
= 4096 bytes 
= 8192 bytes 
=16384 bytes 



1.5. PR06RAHAS E LIN6UA6ENS 

Con-forme dissemos, para que um computador execute 
qualquer tipo de operaca'o,, e necessario que I he sejant 
fornecldas instrucd'es detalhadas. Ao con junto de instrucdes 
riEJcessarias a e>;ecuca"o de determinada tare-fa da-se o noras de 
programa. 

For en quant Dj, nenhum computador e capaz de entender 
instrugfles na linguagem coloquial i na linguagem em que 
normal mente falamos ). Desta 'forma, as instructs -fornecidas 
i el e s&o em numero restrito e devem ter formatos 
apropriados. Lima determinada linguagem de cnrnputa^So de-fine 
um con junto de instru^des dentro de um determinado format o. 

tipo de linguagem mais rudi mentar , utilizada pelo 
computador e a linguagem de maquina, na qual as instru^o'es 
sSo fornecidas atraves de bytes. Diz—se que uma linguagem e 
de alto nlvel quando as suae instructors procuram se asseme- 
Ibar a linguagem humana. 



Dentre as linguagens de alto nlvel, BASIC, 
pelo nosso computador TK-2000 COLOR, se destaca 
versati 1 i dade, facilidade de aprendizado e popularidade 
are ( 3 de i nf or mat i <=a. 



ut i 1 i z ad a 

pel a sua 



na 
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FA£A SEU RESUMO 



i B As principals partes de urn computador sa*o: , 

2. Os dados e instru^tbes do computador sSo armazenados na 



3. A .............. § responsavel pelo controle e f uncles 

de um sistema de cornputa^a'o. 

4. No computador TK-2000 COLOR, a tela da televisSo 
corresponds a unidade de e o teclado a unidade 

5. Os computadores trabalham internamente dentro do sistema 
de numera£&o 



.......... pode ter o valor 1 qu 0, conjunto de B 

....... fe chamado ........„«,„. Kbyte corresponde a 



7. Um conjunto de instructs com determi nado -fim e chamado 

............. . Um „ . pode utilizar diversas 

'..,.» sendo que a TK-2000 COLOR uti 1 iza a „,.......„.... 

8. Os ...„.„„.....»„,, e dados utiliEados pelo TK-2000 CO- 
LOR, podem ser gravados em 



■ u n v ct ii 



respostas." 

1. U.C.P., Memoria,, Entrada e SaidaS 2. Mem&riaJ 3. U.C.P., 
aritmeticasS 4. Saida, Entrada? 5. Binaries 6. Bit, Bits, 
bytes, 1024 bytes; 7. Programa, Programa, linguagem, 
linguagem BASIC; 8. Programas, -fit as cassete 



CAPITULO II- APRESENTACBO DO COMPUTADOR 

Este capltulo visa coloca-lo pela primeira ves em can- 
tato com o computador TK-2000 COLOR. Inicialmente sa"o apre- 
sentadas em rapldas palavras, as caracterlsticas mais rele- 
vantes do TK-2000 COLOR. Apos a leitura deste primeirD item, 
voce devera estar com seu TK-2000 COLOR ja instalado (de 
acordo com as instru^&es do Manual de InstalacSo) e, procu- 
rar acompanhar as denials descri files no seu pr&prio computa- 
dor. Portanto prepare-se para ingressar no mundo pratico da 
computaca'o. 



1 1 . 1 . CARACTER I ST I CAS TECN I CAS 

computador TK-2000 COLOR e constituido por urn corpa, 
onde s&o alojados a LLC. P., circuitos ltbgicos, as mem&rias 
RAM e ROM, o teclado, e os conectores para ligaeao de urn 
aparelho de televisa"o e/ou monitor de video e gravador 
cassete. Assi m mesmo, se encontram presentes conectores para 
ligaf&o de impressora, do joystick, e urn conector para 
liga^a'o de peri-fericos varios, tais como cartuchos com 
programas fi>;os, discos magneticos,, sal das RS 232, gerador 
de som e voz , etc. 
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Fig. II . 1 

Como U.C.P. o TK-2000 COLOR utiliza o Microprocessador 



6502 



Para armasenar seu si sterna de control e. 



TK-2000 COLOR 



dispbe de 16 KBytes de RDM e, para a area que devera conter 
programas carregados pelo operador <atrav*5 do teclado ou 
■fita cassete) 48 Kbytes de memoria RAM,, que permitem armaze- 
nar o equivalente a 49-142 caracteres. 
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teclado do TK-2000 COLOR e constituido por 54 teclas, 
que podem ser divididas em teclas de caracteres, de mudanija 
e de funffles, -fig II.2 con-forme sera apresentado adiante. 
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Fi g . II. 



No corrector do aparelho 
qualqusr tipo de aparelho, 
Natural men te, at raves do tel 
ma lores recursos visuals, uma 
COLOR permits a de-finicSo de d 
figures (-fig 1 1. 3). Da mesma 
gravador, pode ser ligado qu 
Lembre-se, a falta do gravad 
TK--2000 COLOR., par em este e 
armazenantento dos programas q 
couto para a utiliza^aiD de fi 
gravados, que voce pode?ra 
biblioteca de programas. 



de televis&D deve-se ligar 

preto e branco on col or i do. 
evisor col or i do ser&o obtidos 
ves que o computador TK--2000 
iversas cores para graf icos e 

maneira, no conector para o 
alquer model o do tipo cassete. 
or nSo imped! ra a operac&o do 

urn importante recurso para 
ue voce irS desenvol ver . bem 
tas cassete com programas ja 
adquirir para criar uma boa 



BOHHHdOdOOHOOOOHHOOOtitmOOHOaHOHBbdOa 




-POWER © © gg= 



iREMOTE CONTROL 



Fig 1 1.3 

Para detalhes da montagem do seu si sterna, consul te d 
Manual de Instal a$:Sa do Computador TK-2000 COLOR, fig. 1 1. 4 
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1 1.2 I1MICI0 DE OFERACAO 

Como JJt dissemos, a partir deste ponto, para melhor 
aprovei tamento do conteudo deste manual ^ voc§ devera estar 
com seu si sterna montado. 




Fig II. 4 

Ligue agora o televisor 



(no canal 3 ) e. 



em seguida o 

TK-2000 COLOR. TK-2000 COLOR emiti ra enta*o um sinal sonoro 
e uma luz vermelha (POWER) pro* i ma ao teclado se acendera, 
indicando que o compntador esta pronto para operar. 




Fi g 



Surge entSto na tela do televisor, a legenda "TK-2000" 
na parte central superior do video, o sinal de comando ( > ) 
e cursor ( | ) no canto superior esquerdo. 



II. 3. UTILIZAfAO DA TELA 

A tela do televisor utilizada pelo TK-2000 COLOR, tern 
par -Fun^So apresentar os dados e instru^&es que voce digits 
np teclado, bem como os resultadoe das- i nstrufftea executadas 
pelo TK-2000 COLOR. 

Enistem tres modos de operaca"o da tela. Um deles e 
usado para a apresentacaio de textos em preto e branco e os 
outros dois, que serSo vistps em capitulos poster i ores,, s«(o 
usados principal mente para grAficoa coloridos. 



No modo texto, a tela pode conter ate 24 linhas de 40 
caracteres cada. (-f i g. 1 1 . 6) 



Fig. 1 1 . 6 




40 codings 



4- 



II. 3.1. sinal de comando (>) 

sinal de COMANDO CM, que voce ve na primei ra posicSo 
da tela (primeira coluna da primeira linha), indica que o 

TK-2000 COLOR esta pronto para receber instru^des atraves do 
teclado. 



II. 3. 2. cursor < | ) , 

Quando o sinal de comando esta presents na tela, qual- 
quer c&racter digitado e apresentado na posic&o em que se 
encontrava o cursor, o qua.1 passa i medi atamente para a 
pr&x ima posi £a"o na tel a. 

Concluindo, o' cursor sempre indica a posiccfo da tela 
para a qual serSi registrado o priximo caracter digitado no 
tec 1 ado. 



II. 4 - UTILIZACAO DO TECLADO 

A -finalidade do teclado (fig. II. 4) e permitir que voc§ 
registre caracteres na tela e na memoria do TK-2000 COLOR, e 
execute deter mi nadas f unc6es. 
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Fig. II. 7 
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1 1. 4. 1. Teclas de Carac teres 

Os caracteres emitidos par estas teclas podem ser divi- 
didos em alfab&ticos, numericos, simbilicos, graficos e de 
instru^ftes. 

No computador TK-2000 COLOR, as teclas que emitem os 
caracteres alfabeticos est&o dispostos de forma semelhante a 
usada em Lima mi* qui na de escrever. Entretanta, as letras s&o 
geradas somente no ■formato maj.f,isculo, que e a su-ficiente 
para a progra/nafelo BASIC. 

Na camputa$:a'o e indi spensAvel distinguir a I etra do 
numero (zero) . Para tanto, o zero e apresentado na tela 
como um circulo cortado <0) . Os demais caracteres numericos 
n«(G possuem qualquer dilerenfa dos convene! onai s. 



Alem dos simbolos 
escrever (sinais de pont.ua 
permite ainda a emi sstfo 
(menor que) e H (arroba) . 

E>; i stem 50 diferentes 
a e>;ecuc;a"o de tabelas e 
encontram-se tambem os nai 
desenvol vimento de jagos a 

Os caracteres de inst 
caracteres emitidos atr 
tecla, que em i tern palavras 
as instruefcres mais utiliza 



normal mente usados na maquina de 
fa'o, $, &| etc.), o TK-2000 COLOR 
dos sinais ">" (maior que), "<" 



Blmbolos graficos, e que permitem 
figuras. Entre estes simbolos, 

pes de bar a 1 ho, que ser So utei s no 

traves do computador. 

ruc£ft»s sao na realidade grupos de 

aves da digitac^clQ de somente uma 
da lingua inglesa correspondentes 

das pel a linguagem BASIC. 



Os caracteres emitidos pela simples digitac&o 
grupo de teclas, ffijta indicados na -figura a seguir. 

i 



deste 



^mmmmmmmmmmni^' 



RESET 



3ag@000000000H 



EE 00 SHE mm El 



SHIFT 



SHIFT 



] 



SPACE 



Fig. II. 8 

Procure digitar alguma destas, par exempla, o numero 
zero e a letra 0, e observe os resultados na tela. Note que 
as teclas FIRE emitem © caracter "." (ponto) e correspondem 
exatamente a tecla > quando pressionada sozinha. 
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1 1.4. 1. a. Uso dos Caracteres Graf i cos 

Antes de se usar os caracteres graficos deve-se 
pressionar o con junto de teclas CONTROL e B simul taneamente 
e ent&o apertar a tecla SHIFT e Lima tecla al-f anumeri ca, que 
-Fara com que o simbolo gra-fica seja apresentado na tela. 
Para se utilizer os simbolos gra-ficos restantes basta manter 
pressionadas as teclas SHIFT e CONTROL si mul taneamente e a 
seguir digitar a tecla cujo simbolo e desejada. 

Quanda voce desejar vol tar ao modo normal de operaca"o 
do teclado, pressionar novamente o conjunto CONTROL-B. 

A seguir sera apresentado urn programs em BASIC que 
que permits a impressa'D dos caracteres graficos. 

>10 FOR I = 193 TO 242 
>20 PRINT If* "jiCHR$<242) ;CHR$<I) 
mm REM, A FUNCAO CHR*C242) DEVE SER 
COLQCADA BEMPRE ANTES DO CQMMPX) CHR$ (I ) 
PARA SE OBTER A IMPRES5A0 DL_. CARAC —RES 
6RAFIC0S 
>30 NEXT 

* 






1 1.4.2. Teclas de Mud an pa 

As teclas de mudanfa, quando digitadas sozinhas, riSo 
exercem -funca"o alguma, porem enquanto pressionadas, modi-Fi- 
cam a atuacSo de outras teclas, conforms descrevem os 
prftximos sub -i tens. 

■ 

1 1. 4. 2. a SHIFT 

■ 

A tecla SHIFT -faz com que as demais teclas passem a 
gerar os caracteres representados em suas metades supe- 
riores. A figura II. 9 indica a posicSo da tecla SHIFT, bem 
como os caracteres que as demais teclas passam a gerar, 
quando esta estiyer pressionada. 

□SmmmfflEmmiiEizzirr-j 
DsnnnnnmEBnna 
innnnnnnnsmnncn 



•^rnnnnnnnnmmm r^^n 



Fig. II. 9 



Can-fira o apresentado, abai>sando a tecla SHIFT e digi- 
tando alguns caracteres. 



II.4.2.b. CONTROL 

A tecla CONTROL pressionada em con junto com SHIFT -fas 
com quf? os comandos con-Forme a -figura 11.10 passem a ser 
gerados, enquanto estiverem pressionada, con-forme indi ca a 
f igura II. 10. . 

MOTOR? 

stop amr mve ma nun ust nam ut pel new 
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TEXT 

I I 



Fig 11.10 

Note tambem que certas teclas, quando pressionadas em 

con junto com CONTROL,, fazem com que o TK-2000 COLOR execute 

determinadas -funccbes. For ewemploi: 

CONTROL + C - ; Interroiripe urn programs ou uma listagem. 

CONTROL + X = Cancel a a linha que esta senda digitada. 

CONTROL + G — Gera um beep 

CONTROL * B ■ Entra e sai do mode grafico 

CONTROL + S = Para a listagem de um programa BASIC. 

CONTROL + Q = Fermi te continuar a listagem. 



11.4.3. Teclas de Fun^Oes 

A este grupp pertencem as teclas que, quando pressiona- 
das, ao inv£?s de gerarem caracteres, executam uma f-un<f=co. 



I I. 4. 3. a. RETURN 

Ao operar o teclado, os caracteres sSo apresentados na 
tela, © retidos na memoria, num lugar especi almente dedicado 
para tal -fun^So. porem eles nSo sSo interpretados, ate que 
se pressione a tecla RETURN. 

A tecla RETURN indica ao TK-2000 COLOR que a linha de 



comando -foi terminada. Duando pressionada, os caracteres a 
direita do cursor sSo suprimidos e os da esquerda 5&0 ei-sami- 
nados, Be -formarem uma instru^tSo que o TK-2000 e capas de 
entender, a aca"o apropriada e executada, caso contrario, e 
emitido urn sinal sonoro e a mensagem "7SINTAXE #ERRO" e 
apresentada na tela , caso em que o comando, com a devida 
corre^So, deve ser novamente digitado. A local izaf^a desta 
tecla | apresentada na figura 11.11. 



nnnnnnDDDnnnc 
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Fig. II. 11 



II.4.3.b RESET 

Quando as teclas RESET sKo pressianadas si mul taneamen- 
te, qualquer opera^o que o TK--2000< COLOR esteja -fasendo e 
interrompida e o slmbolo de comando (>) e apresentado na 
tela permit indo a entrada de uma nova instrucpa'o (-fig. II. 12) 
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Fig. II. 12 

Esta tecla somente devera ser utilisada como 
ultima opcSo, quando nao -for possl vel sair de determinada 
situacSo de outra forma. 



II.4.3.C. Tec las de Movimentacolo do Cursor 

S3(o apresentadas na -figura 11.13 as teclas de 
movi mentacSo do cursor. 
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Fig. II. 13 

Cada Lima desta tec las movem 
direccto indicada pel a -flecha: Lima 



uma col una para a esquerda 
uma linha para bai-xo'i^}. 



> 



o cursor, uma posiija'D na 
coluna para a direita (•*) , 
uma linha para cima (4) , f 



Lembre-se, numa determinada linha, ao se pressionar a 
tec la RETURN, so serSd consi derados os car acteres que 
estiverem a esquerda do cursor, ou de outra -forma, os csrac- 
teres que estiverem da posipclo do' cursor para a direita 
serao ignorados pelo TK-2000 tOLDR, nao sendo enteto 
registrados na mem6ria. 



II. 4. 4. 



REPEAT 



Press! onando-se qual quer tecla de caracteres alfanume- 
ricos e si mul taneamente a tecla REPEAT, a caracter em ques- 
ta'o se reproduzira automat i camente. 



I I. 5. GRAVADOR CASSETE 

Con-forme ja dissemos, este equipamento e opcional (em- 
bora mLiito util), e permite o uso de programas ja vendidos 
em fita cassete ou a gravacSo de seus proprios programas. 



II.5.1. Cui dados com a Fita Cassete 

Antes de comecarmos a descrever o uso do gravador 
cassete, e muito importante que voc£ tenha em mente certos 
cui dados que se deve ter com as fitas cassete. Para voc£ 
sentir a i mportanci a destes cuidados, lembre-se que, uma 
pequena alteraca"o numa fita musical e quase i npercept I vel ao 



ouvinte, ao passo que, 
:i nut i 1 1 za-1 a total mente. 



urn dado alterado nura programa pode 



Qs principals cuidados cam as fitas cassete sa"a: 



1. par mais limpa que esteja sua (liSo, 
super-f Icie da fita; 



nunca toque na 



quando as fitas nSo estiverem em uso, guarde-as 
5empre dentro da respective cahia, evitando assi m 
que 5e j am e>;postas a poeira e a umidade. 

nunca permits que as fitas fi quern expostas a 1 Liz 
direta do Sol , qu de forma geral que se j a gnardadas 
em locais que possara vir a se esquentar. 



4- nao aproxime a fita de campos magnet i cob, por 
e>!entp].D,DS qerados por motores ou trarts-formadores 
eletricos, 3 m&s permanentes (como as cantidos na 



mai on a 

etc ,. 



dos alto fal antes), aparelhoe de televisefD, 



II. 5. 2, Organisa^cfo das Fitas 

Fara que voce na*a perca urn grande temp>o 
encont rar em que -fita est a determinado programa, 
te manter sua fitoteca organizada. Desta forma, 
todas as fitas etiquetas indicando os programas que cada uma 

contain ,, 



procur ando 
e imp or tan- 
utilize em 



1 1. S. 3. Prote^So contra Regrava^&o 



Toda fita cassete tern dois orificios em sua face 
posterior. Pi maloria dos gravadores, quando local i?.am a 
existencia destes orificios, nSo permitem a gravafrto. As 
fitas cassete virgens possuem linguetas cobrindo est.es 
orificios, permitindo assim sua gravacSo. Voce pode proteger 
programas ifflportant.es quebrando estas linguetas. 

Para determinar qual lingueta deve? ser removida, segure 
a fita cassete com os orificios voltados para voce e a face 
que se quer proteger para cima. Remova entSo a lingueta do 
lado direito. (f ig. 1 1 . 4) 



Fig. I 1 . 14 
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ao lado B 
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1 1.5. 4. Ajuste do Gravador 

Cert i f i que-se que seu gravador nSo (r\sr<z& a super -fide 
das fitas ja que i sto pode gerar erros ou estragar a fita. 

Depois de conectar o gravador de acordo com as 
instrufdes do "Manual de Instala^So", pressione a tecla 
RETURN,, que causar& a apresentaeeio do sinal ">" na margem 
esquerda da tela, indtcando que est. a pronto para novas 
i nstrufdes. 

Para envi ar in-forma^des cant i das \iSi -fita para o 
CDniputadar, o gravador deverli estar acionado no mado PLAY. 
E;;iste par em uma faixade volume certo para que o TK-2000 
COLOR possa entender estas inf ormaf fles> For a deste volume, a 
TK— 2000 COLOR aviiaara o ajuste inadequada (acima ou abaixo 
do corrrato) atrav^s de uma mensatjM de erro na tela- 

Para obter o volume certo coloque inicialmente o grava- 
dor no rfiodo PLAY,, ■ com urn volume em torno de B0V. e verifique 
se as i nf armafOes s.a"o enviadas corretamente. Se isto na'o 
ocorrer, repita a opera^So com o volume urn pouco mais baii-io 
e assiffi sucessi vamente, ate que o TK-2000 COLOR emita urn 
ainal sanoro indicanda a correta regulagem do volume. 

Se sentir ainda alguma dif icul dade, tente ajustar a 
pasi^a'a da cabe?a do gravador, com uma chave de fenda, sabre 
O para-fuso que control a essa posifcfo„ Q criterio a ser usado 
no ajuste t- a da obtenfSo do som mais puro e alto que voce 
possa obter. 



1 1.5. 5. Carga de Programs 

TK-2000 COLOR pode ser carregado com doi s tipos de 
fitas cassete gravadas? as fitas no -formato TK-2000 e as no 
■format o APPLE II. Note que nem todas as fitas no formato 
APPLE II podem ser utilizadas no TK-2000 COLOR, de modo que, 
we voc:^ possui fitas nesse formato, deverA tentar us£t-las e 
verificar se funcionam ou nSo. 

Dois comandos podem ser usados para carregar um 
programs no TK-2000 COLOR: 

LOADT ou LOADA 

LOADT "nome~de— programa"- para carregar programas no formato 

TK-2000 COLOR 
LQADA - para carregar programas no formato APPLE II 

DBSERVACPiC: Em LDADT, o nome-de-programa £ opcional (somente 
necessario quando a fita tiver mais do que um programa) e 
corresponde ao nome de um programa ou de um conjunto de 
dados especlf i cos, que conforms dito tern no max i mo 6 
caracteres (exemplo: JOGO |, CONTAS, DEBITO, ANTON I ,, etc) e 
dwvft ser sempre digitado entre aspas. 



Uma das vantagens de se usar o comando LOADT j§ que 
durante a carga do programs., aparece no video o numero de 
registros do arquivo (na base hexadecimal) e tamb&m urn 
contador progressive que indicara quando a carga do arquivo 
•for completada. Be o arquivo -foi carregado sem erro, o si nal 
OK e apresentado na tela e,, em caso contrario surge uma 
mensagem de erro. 

E outra vantagem & a possibi 1 i dade de gravar e 1 er cam 
name espec J. # i co para cada programa. name pode ter no m&~ 
xima 6 caracteres. 

D seu computador TK-2000 COLOR vem acompanhado de uma 
fita cassete com urn programa denominado TESTE. Este tern como 

final! dade constatar o per-feito f unci onamento do equipamen 

to. Agora siga qs seguint.es passes para carregar o programa 
"TESTE" no sou TK-2000 COLOR. Para cada posicao do control, e 
de volume, sugar imos o seguinte: 

1. Rebobine a -fita ate o inicio 

2. Digite: 

>LQADT "TESTE" 

em seguida pressione a tec la RETURN 

3. Pressione o batata PLAY do gravadar. 



Ap&s a terceiro passct, o cursor desaparecera da tela. 
Aguarde entao cerca de 15 segundos,, ap&s o que surgira a 
raensageml 

TESTE 14 00 WAIT 

onde TESTE corresponds ao nome do programa,, 14 ai:i numero 
total de blocos do programa (em hexadecimal);, 00 bo contador 
progressi vo e WAIT a mensagem indicando que o programa estci 
sendo lido e que votJ deve aguardar.. 

Apos algum tempo, e apresentado entSo na. tela: 

TESTE 14 14 WAIT OK 
I 

Neste momenta o programa esta corretamente carregado e 
pronto para uso. 



I I, 5. 5. a. Erro na carga do "TESTE" 

Em i stem quatro possi bi 1 idades que podem ocorrer antes 
que um programa tenha si do carregado com sucessa: 

a) Surge a mensagem "SINTAXE #ERRO" 
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b ) Mad a Dcarre 

c) A mensagem "ERR" on "ERRO" £ apresentada 

d) alarme do computador soa (beep), porem nada mais 
acantece 

A mensagem apresentada no caso "a" indi ca que voce 
digitou err ado o comando LQADT ou esqueceu de incluir a nome 
"TESTE" entre aspas ("TESTE"). 

No caso "b" ou "c", assegure-se inicialmente que voce 
aguardou o interval o de 15 segundos. Se o slmbolo de comando 
(>> ou cursor na"o aparecerem, e a TK-2000 COLOR n3fo respon- 
rier ao teclado, pressione a tecla RESET, aumente urn pouco o 
volume do gravadar e repita os tres passos indicados para a 
carga do programa. Rod© acontecer tamb^m que o cursor apare- 
t;:a na tela i medi atamente apos a execufSo do comando LOADT, 
sem que qual quer outro -fata ocorra, Neste caso, desligue p 
ligue novamente o TK--2000 COLOR (atraves d^ chave LIGA/DES- 
l... I13A) , repetindo em seguida a operac&a de carga do programa- 

Quando o TK-2000 COLOR emitir o si. nal sonaro (beep) e a 
tela apresentar o si nal de comando PRONTO ( > ) e o cursor,, 
vo<:& esta no caminho certa. Caso somerrte o sinal sonoro se j a 
emitido aguarde par mais IS segundos. Se surgir uma mensagem 
de erro, como a apresentada no caso c ., siga o procedinienta 
citado no paragrafo anterior. Aparece >do o sinal de comando 
@ o cursor, aperte o botSo de STOP do gravador e rebobine a 
■fita. Marque a posi^o de volume do gravador, para que possa 
voltar -facilmente a ela sempre que qui ser carregar urn pro- 
grama. Digite entSo: 



R U N [RETURNl 



II.5.5.b Procedimento Normal para Carga de Programas 

Uma vez ques o volume do gravador ja esteja corretamente 
regulado, ja que o volume pode vs.ria.r de -fita para fita, os 
passos usuais para carga. de urn programa sSo as seguintes: 

1. Rebobine a fita 

2. Digitar LOADT "nome-de— programa" 

3. Pressionar o bota"o PLAY do gravador 

4. Pressionar RETURN (o cursor desaparece da tela). 
Nada acontece por 5 a 20 segundos, e entcfo soa o 
alarme (beep) do TK-2000 COLOR. Isto significa que 
as informations da fita comecaram a ser carregadas 
no TK-2000 COLOR. Ap6s mais algum tempo, dependendo 
da quantidade de informa^cto da fita, o alarme do TK- 



2000 COLOR soa novamente i este tempo nSo costuma 
ser maior do que alguns segundos ), e o sinal de 
comando juntamente com o cursor reaparecem na tela. 

5. Apertar o botao STOP do gravador e rebobinar a fita. 

6. Digitar RUN e pressionar RETURN. Apos este ultimo 
paeso, o programa comecara a ser executado. 

7„ Como op^So ao item 3 utilise o cabo remote do seu 
gravador e 1 i gue-o atraves do comando MOTOR antes da 
etapa 4. comando MOTOR e especi+ico para ligar ou 
desligar os gravaclores e esta descrito com maiores 
detalhes na se^Ko VI 1 1. 4. 3. 
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FACA SEU RESUMO 

1. sinal apresentado na tela informs que o TK-2000 

COLOR esta apto para receber instruffles, enquanto o 

indica a posu^o em que o prdximo ca.ract&r digitado devera 
surgi r . 

2. No TK-2000 COLOR o zero e representado pelo simbolo "....' 

3. As teclas de mudan^a, que sa"o e „ enquanto 

pressionadas alteram a funeSo das teclas de caracteres. 



4. Os caracteres apresentados na tela, e que estej 



am 



- - « - - 



do cursor, s6 sa"o interpretados quando a tecl 



a 



- e digitada. 



5. Qual quer operacSfo que o TK-2000 COLOR esteja realizando e 
interrompida quando as teclas sSo pressionadas. 

6„ As teclas de 5 &o muito 

frteis para correc&o de erros de digitado, ou para modi-ficar 
informacoes ja registradas. 

7. comando e ............ seguidos opcionalmen- 

te do nome-de-ar qui vo entre aspas ( e necessario quando a 
-fita tiver mais do que urn arquivo), s&o usadas para carregar 
programas de fitas nos formatos e 

respect i vamente no computador TK-2000 COLOR. 



B, Se 



urn 



comando e digitado com erro, 
na tel a. 



surge a mensagem 



9. Ap&s a correta regulagem do volume do gravador, a sequen-- 
cia necessaria para a carga de urn prograrna e: 1) 



e 



a fita; 2> Digitar, 
pressi one , 

do qravador. 



3) Pressionar 



tecl a 



aci on ados 



10. Os caracteres gra-ficos do teclado sSo 

pressi onando-se o conjunto de teclas e 

&imul taneamente. Urn novo pressi onamento deste conjunto de 
teclas faz com que o teclado volte do sen estado normal. 



1.1. Uma ves acionados os caracteres gra-ficos do teclado, os 
simbolos que se encontram no canto superior esquerdo das 
teclas al-f anumericas s&o obtidos atraves do 
desta tec la em conjunto com ........ e para o 

1 os do canto superior direito das teclas 
deve-se somente a tec la desejada. 



pressi onamento 
uso dos simbo- 
al-f anum&ri cas, 



Respostas: 1. >, | ; 2. 0; 3. CONTROL, SHIFT? 4. esquerda, 
RETURN; 5. RESET; 6. Movi mentacao do cursor; 7. LOADA, 
LOADT, APPLE, TK-2000 COLOR; B. SINTAXE #ERRO; 9. Rebobine, 
LOADT, nome de arquivo, RETURN, PLAY; 10. CONTROL, B; 11. SHIFT 
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CAPITULO III - D TK-2000 COLOR COMO CALCULADORA 

Quern imagina que a opera^So de um computador e algo 
complexo e e>:ige um profunda estudo, verificara que, atrav&s 
do chamado MODO IMEDIATO da linguagem BASIC, poderemos solu- 
cionar expressSes aritm&ticas com a mesma facilidade (ou ate 
mais facilmente) que pelo uso de Lima calculadora 
convene ion a 1 . 



ZII.l. COMO USAR MODO IMEDIATO 

Quando voce utiliza o BASIC no TK-2000 COLOR,, ele ja 

esta pronto para operar no MODO IMEDIATO (tamb&m chamado 
Direto ou Modo Calculadora). Nesta forma de operafKo, o 
computador responde imediatamente as instrucbes desejadas. 
Digite a instru^So PRINT, um espaco e o nCtmero 385, conforme 
se v£ abaixo : 

>PRINT 385 

pressione agora a tecla RETURN. numero 385 surge entSto 

na linha seguinte do video- Pronto, vac& acabou de executar 

uma instrucSo na linguagem BASIC™ Dificil nSa ? 

Os itens a seguir apresentam a forma de se solucionar 
expressdes ar itm£ticas atrav&s do MODO IMEDIATO da linguagem 



II I. 2. AS OPERACOES ARITMETICAS 

Para se executar uma opera^cto aritm&ticas atrav^s do 
MODO IMEDIATO, basta emitir o comando PRINT, um espaco e em 
seguida digitar a expressSo desejada em linguagem BASIC 
Porem lembre-se, o computador P embora rapido e eficiente, e 
incapaz de deduzir qual quer coisa. Portanto, voce deve usar 
somente os simbolos matematicos definidos dentro do BASIC. A 
tabela a seguir apresenta tais simbolos bem coma a ordem de 
preced£ncia dos operadores. 

* ORDEM DE TIPO DE SIMBOLO * 

* PRECEDENCIA OPERACAO UTILIZADO * 
##*###***###***#*#####*###*#*##***#+*#******######*##*###**"* 

* 1 Potenci a§:c(o A * 
# * 

* Multiplicaccto * * 

* 2 , * 

* DivisSo / * 

# : : * 

* AdicSo + * 

* 3 * * 

* Subtracts - * 

TABELA 1 1 r . 1 
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Exemplo : suponha que vac& quei ra eomar o namero 3 go 5. 
Para isso, digite: 

>PRINT 3 + 5 (RETURN) 
8 

o numero 8 deverS entefo surgir na prfixima linha do video. Se 
voc6 desejar subtrair cieste resultado o numero 6„ prossiga 
assi m: 

>PRINT 8-6 (RETURN) 
2 

o resultado destas duas operaffies (2) pode ser obtido 
diretamente, di gi tando-se numa so linha : 

>PRINT 3+5-6 (RETURN) 

Atenca"o: 1. Na sequ^ncia deste capitulo, tal qual acontece 
no video, as respostas, apos o pressi onamento 
da tecla RETURN serlfo apresentadas na linha 
abai>:o de onde se encontra o comando. 
2. Ds espacos emitidos entre numeros e apera- 
dores, tern somente a ■funfSo estetica. Desta 
maneira, o comando acima poderia ser digitado 
na forma : 

>PRINT 3+5-6 
2 . 

Execute agora as seguintes operates : 

>PRINT 672 + 254 -511 (RETURN) 

415 

>PRINT 827 - 12 +88 - 706 

197 

As operafbes de multiplica&o e divisKo sKo similares. 
Por exemplo, para multiplicar o numero 4 pelo 5 digitamos: 

>PRINT 4*5 (RETURN) 
20 

Se quisermos dividir o numero 20 (resultado da operacSa 
acima), por 2 eKecutamos: 

>PRINT 20/2 
10 

rnesmo resultado das duas operacOes apresentadas pode 
ser ser obtido numa unica linha: 

>PRINT 4*5/2 (RETURN) 
10 
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Seguem mais al guns exemplos: 

>PRINT 3*2/4*3 <RETURN> 

12 

>PRINT 2*6/3*5/ 10 <RETURN> 

2 

Para elevarmos a numera 4 a quinta potertcia (4*4*4*4*4) 

podemos fazer: 

>PRINT 4*4*4*4*4 (RETURN) 

1024 

ou si mplesmente, 
>PRINT 4 "• 5 
1024 

Da mesma forma podemos elevar 5 ao quadrado., ou 3 ao 
quadrado, ou qual quer numero desejado: 

>PRINT 5 A 2 (RETURN) 

25 

>PRINT 3^2 (RETURN) 

9 

Agora, digite o comando abaixo, por^m, antes de pres- 
isionar a tecla (RETURN), tente voce mesmo encontrar a 
resposta. 

>PRINT 5 + 3 * 4 A 2 

Ja calculou ? Pressione entefo RETURN. Se o seu resulta- 
do foi 53 e por que voce ja est a sabendo usar m ordem de 
preced£ncia dos operadores. Se o resultado -Foi di-ferente, 
vamos fa^er juntos a sequ#ncia das operacSes., passo a passo. 
Consul tando-se a tabela 5.1, vemos que a operaca*o priorita- 
ria (precend^ncia 1) e a potenci a<;£lo, logo a primeira opera- 
g&o a ser feita e: 

4 ■'■ 2 ft 16 

a segunda © a mul tipl ica^cto 

3 * 16 £ 46 

e a ultima e a soma : 

S + 48 = 53 

Procure encontrar o resultado dos comandos (antes de 
pressionar a tecla RETURN): 

>PRINT 2 "- 3 + 5*2 

18 

>PRINT 4/2+3^2*2- 20/2 

10 

>PRINT 8 + 2^3*4-4^2 

24 , 



1 1 1. 3. USO DAS FUNCOES MATEMATICAS ATRAVES DD MQDO IMEDIATO 



TK-2000 COLOR per mite diversas funffies matemati cas. 
Uma vez que este tenia sera desenvol vido em capltula poste- 
rior, nossa objetivo neste item e apenas mostrar como estas 
funfifes sao usadas no NODO IMED-IATO. 

Vamos usar como e>:emplo a raiz quadrada ( V) , que no 
BASIC corresponde ao comando SQR (X) .. Desta -forma, se 
desejarmos extrair a raiz quadrada de 16 deveremos digitar : 

>PRINT SQR (16) ( RETURN > 
4 

ObservaySo: a operaca'o acima pode tambem ser executada, de 
lorma mais lenta (em termos da operafSto do computador) 
atraves do comando : 

>PRINT 16 ■"• 0.5 
4 



1 1 1. 4 A FORMA DOS NOMEROS NO COMPUTADOR TK-2000 COLOR 

For motives de padroni zaea'o e limitacoes do proprio 
computador, s&o estabelecidas cartas regras para a 
apresentacSo de nCtmeros pelo TK-2000 COLOR.. 

REBRA 1 : Zeros a direita do numero ap6s o ponto decimal , ou 
zeros a esquerda do nflmero s&o eliminados. 

Exemplar 

>PRINT 045.340 (RETURN) 
45.34 

RE6RA 2 : N&meros muito proximos de zero, entre -3E-39 e 
3E-39 (ou em nossa natacSo -3*10'"-39 e 3*10^-39) 
5&0 arredondados para zero. Procure voce mesmo 
executar alguns exemploS. 

REGRA 3 : Numeros com partes inteiras e decimals, cam mais 
de 9 algarismos, sSo arredondados. 



Exemplo: 



>PRINT 985780.6898 
985788.69 



REGRA 4 : N&meros com mais de 9 algarismos inteiros passam a 
ser representados atraves da Notaca"o Cienti-fica. 
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Ek ernp 1 o : 



>PRINT 1234567890 
1.234567B9E+09 



repare que E+09 representa 1000000000 (ou *10 A 9) , portanto 

como sabemos: 

1234567890 = 1.23456789 x 10- 9 

Be voce nSlo esta habituado ao uso da NotafSo Cientlfica 
na"o se preacupe, quando -for necessario voce aprendera facil- 
mente a lidar com ela. 

Repare que as regras apresentadas na*o ir^o prejudi car 
qualquer tipo de apera^o no TK-2000 COLOR. 

E possivel fugir as regras apresentadas? Sim, vamos 
utilizar os mesmos exemplos apresentados durante a explica- 
fcto das regras e digitar os nCimeros correspondentes entre 

aspas: 

>PRINT "045.340" (RETURN) 

045.240 

>PRINT "985788.5898" (RETURN) 

985788.6898 

>PRINT "1234567890" (RETURN) 

1234567890 

uso das aspas sera descrito mais adiante, por 
enquanto e su-ficiente entendermos esta explica^So. 
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FA£A SEU RESUMO 



1. Para usar o MODO IMEDIATO basta usar o no TK-2000 

COLOR 

2. Atraves do o computador pode ser 

usado como se -fosse uma calculadora. 

3. As operaco"es matemati cas., de acordo com a ordem de 

preced&ncia sKo: 1) ,2)... e 

,3).. e ; e os si mbolos usados no 

BASIC para represents- las sSo respecti vamente: 

. e 

4. Para se e;;trair a rais quadrada do nQmero 36 devemos 
digit ar .......... (36) 

5. D TK-2000 COLOR aceita urn n&mero com parte intei ra e 
decimal de ate digitos. 

6. NQmeros com mais de nove digitos inteiros sSo apresenta- 
dos pelo TK-2000 CDLOR atraves da 

7. Para n«lo modi fi car a forma do TK-2000 CDLOR representar 
qualquer tipo de n&mero, devemos digitar este nftmero entre 



respostas: 

1. BASIC.! 2. MODO IMEDIATDi! 3. Potenci aca-o, Mul tipl i cac^fo e 
DivisSto, Adicclo e Subtra£&o~ simbolos: *% *, /, +, — j 4, 
PRINT, SBR, RETURNS 5. 9; 6. Nota^cto Cientifica; 7. aspas. 
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CAPITULO IV - INICIANDO A PROGRAMA£AQ 

Conforme dissemos, urn programa e constituido par urn 
con junto de instrucaes que se inter agent com um determinadp 

objeti vo. 

No final deste capitulo, vocfi ja sera capaz de 
desenvolver seus primeiros programas, que apesar de simples, 
terSfo interessantes resultados. 



IV. 1. AS PR I ME IRAS INSTRU£OES 

Para desenvolver seus programas, este item descreve 
tflgumas instruc5es muito utilizadas na linguagem BASIC. Se 
na definie&o initial das instrucoes surgirem duvidas, n&a se 
preocupe pais, na sequ&ncia do capitulo os exemplos tornarSo 
isuas utilizacbes claras. 

IV. 1.1. NEW 

Esta instrucSo faz com que todo conteudo da memoria RAM 
da TK-2000 COLOR seja apagada. For exemplo, ap6s a 
utilizaceto de algum programa, voce deve digitar. . 

>NEW (RETURN) 

para iniciar a carga de um novo programa, garantindo assim a 
n&o i nter-f erenci a das instrucOes anteriormente carregadas. 



IV. 1.2. PRINT 

A instrucSto PRINT, j& utilizada no capitulo anterior, 
faz cam que o programa apresente determinado conteudo na 
tela. El a pode assumir diversas formas conforme podemos ver 
« seguir : 



1) PRINT "conteudo" 
fJuando o conteudo ap6s PRINT & digitado entre aspas, ele 
Mparece exatamente da forma que foi digitado. 

Digite os seguintes comandos no computador e confira os 
resultados, que apresentamos abaixo da linha de comando do 
na«BO exemplo. 

>PRINT "COMPUTADOR TK-2000 COLOR" (RETURN) 
COMPUTADOR TK-2000 COLOR 

>PRINT "3 + 5" (RETURN) 

3 + 5 

Repare que no segundo exemplo a TK-2000 COLOR na"o 
■Kecuttau a operaccto, apresentando-a exatamente da forma em 
que foi digitada. 



Importante; Sempre que quisermos apresentar um con junto de 
caracteres al-Fabeticos (par exemplo um nome) an 
um conte&do fixo (inalteravel ) na tela, este 
devera ser digitada entre aspas, apos um caman- 
do PRINT. Na proximo capitulo este assunto sera 
melhor detalhado. 

2) PRINT conteudo 

Este fliodo e utilizado para a apresentas^ofo de um nDmero 
pre-determinado, ou o resultado de uma operaca"o. Execute no 
TK-2000 COLOR as exemplos. 

>PRINT 385 (RETURN) 

385 

>PRINT 3+5 (RETURN) 

8 

>P«INT COMPUTADOR (RETURN) 



7SINTAXE #ERRO 

>PRINT "3 + 5 = *j 3+5 (RETURN) 

3 + 5 = 8 

Note que na segundo exempla, so inves do TK-2000 COLOR 
executar o comando, surgiu o carater e uma mensagem de 
erro. Este procedi merito ocorreu pais, como ja dissemos, os 
grupos de caracteres al-fabeticos devem ser digitados entre 
aspas. A mensagem de errv ocorreu porque, como veremas 
adiante, o BASIC na"o atribuiu a palavra computador um nome 
de vari avel . 

3) PRINT conteudo, conteCido, conteudo. .... 
Se a virgula e digitada entre dois contefrdps, eles sio 
apresentados com uma tabulaca"a padrSo de 15 espacos entre 

Ex emp 1 a : 

>PRINT 53, 67, 230 (RETURN) 

53 67 230 

>PRINT "UM'V'DOIS", "TRES" (RETURN) 
UM DOIS TRES 

4) PRINT conteddoj conteudo 

ponto e virgula entre dois conte&dos -fas com que eles 
se j am apresentados sequencialmente, sem que haja interval o 
entre os mesmos. 
Exeroplo : 

>PRINT 53*67 

Iff "V t "9 
JOO / 

>PRINT "5 + 3 = "t 5+3, "7 + 2 = ";7+2 
5 + 3 = 8 7 + 2 = 9 

Note que, no Ultimo exemplo, sSo resumidos os quatro 
modos basicos de utilisafSo do comando PRINT. No decorrer 
dos capitulos sera'o vistas ainda, mais algumas formas de 
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nl I I lsra$J&Q desta instrufa"o. 

lib mar vassal Na digita^Ka de urn programa qualquer ao inves 
de se digitar a palavra PRINT, e possivel 
substitui— la par urn sinal de i nterroga^a'a (?) . 
I'ur H>fernplo: 

>?"BOM DIA ! " 
BOM DIA ! 
>?"3 + 4 = "5 3+4 
3 + 4 = 7 

Note que agora o TK-2000 COLOR interpretou o . caracter 

coiud PRINT. 

IV. 1.3. HOME 

A instrucefo HOME -fas; com que todo o conte&do da tela 
■ wja suprimido, e o cursor va para a primeira posi^cfo da 
ttwla. 

Di gi te: 

>HOME (RETURN) 

e observe o resultado. 



IV. 1.4. END 

A instruea'o END -fas com que a e^ecucSro de urn programa 
ittja interrompida ou -finalisada. Esta instruea'o,, bem como as 
prfoximas duas serSo explicadas em mais detalhes no item IV. 2, 



IV. 1.5. LIST 

Afcrav&s desta instruea'o todas as linhas de comando do 
programa sa*o apresentadas, ou seja, listadas na tela. 

Pode-se tamb&m 1 i star apenas urn trecho especi-fico do 
programa usando-se : 

I 1ST X,Y ou LIST X-Y ou LIST -Y ou LIST X- 

onde X & a primeira linha que se deseja listar e Y & a 
Ultima linha cuja apresenta^So £ desejada. X e Y 
(...arrespondem aos nCimeros de linha. 

IV. 1.5. a. CONTROL-S 

Quando a listagem de urn programa e muito longa, pode-se 

I nterrompe-la mantendo-se pressionada a tecla CONTROL e 
digitando-se a tecla S. 
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IV. 1.5. b. CONTROL-Q 

Apds uma listagem ter si do interrompida por CONTRQL-S 
pode-se dar prosseguimenta a mesma atraves de CONTROL-Q. 



IV. 1.6. RUN 

Esta e a instruca*o que "da parti da" na execuca'o de um 
programs ou, como se cost uma dizer, -faz com que o programs 
"rode". 

As vezes, para analisar um programa, e conveniente que 
este seja executado a partir de uma linha de programa. Para 
tanto, podemos emitir o comando: 

RUN XYZ 

representando XYZ uma linha generica de programa a partir da 
qual a execu^clo e desejada. 



IV. 2. MODO PROGRAM ADO 

■ 

Voce- jA aprendeu a usar o TK-2000 COLOR atraves do MODO 
IMEDIATO, que apesar de poder auxilia-lo em aJ. gumas tarefas 
tSo bem quanto uma calculadora, @ muito limitado em termos 
da capacidade real de um computador . Neste item, voce come- 
cara a ter contato com a programacSo, atraves da qual o 
computador podera ter seu potencial realmente explorado. 



IV. 2.1. Numera^ofo das linhas 

Para se executar um programa, e necessario que cada 
linha deste seja relacionada a um nCimero inteiro. Na"o ex i s- 
tem n&meros fixos a serem utilizados para esta numerafKo 
por&m, normalmente as linhas devem ser numeradas em ordem 
crescents, no decorrer do desenvol vimenta do programa. 

Por exemplo, digits a linha: 

>10 PRINT "0 TK-2000 COLOR INFORMA" 

pressione agora a tecla RETURN . Como voce pode perceber, o 
cursor -foi para a pr&xima linha, porem a instruct na"o foi 
executada. Digite agora a palavra RUN e pressione a tecla 
RETURN. Neste momento a tela apresentara : 

>10 PRINT "0 TK-2000 COLOR INFORMA" 
>RUN 

D TK-2000 COLOR INFORMA 

TK-2000 COLOR acabou de executar um passo de programa. 
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Dlgl t« entSo: 

>20 PRINT "20 +25 ■ " ( 20 + 25 (RETURN) 

>RUN (RETURN) 

- 

Como resultado surge na tela: 

D TK-2000 COLOR INFORMA 

20 + 25 = 45 

Embora normal mente as linhas de programa sejam desen™ 
-,'f)l vJ das em ordem crescente, nada impede que, na sequ^ncia 
<U iirogramaccto, sejam acr escentadas linhas no inicio ou 
iftt'TK ft$ linhas jet definidas. Suponha que se deseje 
|| r t-»'in::entar no inicio do nosso programinha a frase 
"h II NCAEJ" - Easta para isso que se digite a linha: 

>3 PRINT "ATENCAO" RETURN 

A linha de comando acima poderia ter qual quer numero 
pHtrw 1 e 9 (inclusive). S6 para brincar mais urn pauca, logo 
*|inw " TK-2000 COLOR INFORMA" vamos incluir a frase "SOB 
Inlh'UCINIO DE (escreva aqui seu name)"- Neste casa, a linha 
iiw t omando que irecnos definir devera ter urn numero entre 11 
\» IV (inclusive). Por eMemplo: 

M8 PRINT "BOB PATROCINIO DE (e<screv& aqui seu 
nome) " RETURN. 

dinner va$:&o: n3fo . se incomode com a -fato da instruct n£o 
poder ser incluida numa so linha. Prossiga a 
digitac&a, normal mente, na linha seguinte. 
Pode-se usar ate 239 caracteres Cincluinda 
brancos) numa mesma linha de comando. 

Digite RUN e a tecla RETURN, quando entSo surgirS : 

ATENCAO 

TK-2000 COLOR INFORM A 

BOB PATROCINIO DE 

20 + 25 = 45 

Be voce qui ser ver a listagem do seu programa, digite : 

>LIST (RETURN) 

A tela apresentara: 

3 PRINT "ATENCAO" 

10 PRINT "0 TK-2000 COLOR INFORM A" 

IB PRINT "BOB PATROCINIO DE (escreva aqui seu nome) 

20 PRINT "20 + 25 = "5 20 + 25 



ATENCflO : 

1. Nate que as linhas de comando serSo sempre executadas 
de acordo com a ordem de numera^ao 

2. Nclo e conveniente que as linhas de comando tenham 
numeros seguidos (1,2,3....,), pois e muito frequente a 
necessidade de incluir Lima nova linha de comando entre 
duas ja existentes. Para seguir Lima certa padroniza^ao, 
e interessante que, pelo menos no inlcio, s numere as 
linhas de 10 em 10 (10, 20 30, 40 ) 

3. Se for dado d mesmo nQmero de linha para dels comandos 
di-ferentes, prevalecera a ultima de-Finica'o est^bel eci- 
da. Desta -forma, se ap6s executarmos a nosso programi- 
nha, digitarmos : 



PRINT "0 HQMEM CHEGOU A LUA 



RETURN 



ao digitarmos novamente, 

>RUN RETURN 

teremos 

ATENCAO 

D TK-2000 COLOR INFORM A 
SOB PATROCINIO DE .... 
HOMEM CHEGOU A LUA 



IV. 2. 2. Primeiro Programa 

intuito deste item e mostrar que, com algumas instru- 
cftes basicas, |1 pademos mantar urn programa o qua! „ embora 
simples, sera bastante ilustrativo. 

Nosso programa tern par objetivo montar na tela do TK- 
2000 COLOR uma tabela com as mul tip], icadores de 1 a 10 das 
numeros 2 e 3. Para i sso todas as operaco'es que voc& devera 
executar no seu TK-2000 COLOR estao descritas a seguir, 
passo a passo. 

Aten^&o: lembre-se que ap&s cada linha de comando \>ac& deve 
pressionar a tec la RETURN para que as 
in-f ormacoes sej am registradas pelo computador. 



Passo 1 : limpe a memoria do TK-2000 COLOR digitando 

>NEW 
Passo 2 : prepare o titulo da tabela : 



>10 PRINT "TABELA DE MULT I PL I CACAO" 

so 3 : forne^a uma linha em branco entre o tltula e a 

tabela: 

>20 PRINT 

Passo 4 : apresente na primeira linha os mul t i pi icadores : 

>30 PRINT , "X2", "X3" 

Passo 5 : prepare agora a tabela : 

>m PRINT 1, 1*2, 1*3 

>S0 PRINT 2,2*2,2*3 

>60 PRINT 3,3*2,3*3 

>70 PRINT 4,4*2,4*3 

>80 PRINT 5,5*2,5*3 

>90 PRINT 6,6*2,6*3 

M00PRINT 7,7*2,7*3 

>110PRINT 8,0*2,8*3 

>I20PRINT 9,9*2,9*3 

M30PRINT 10,10*2,10*3 

Passo 6 : finalize o programa 

M40 END 

Passo 7 : vamos verificar se em nenhuma linha houve erro de 
digitafSo, ou se na"o esquecemos alguma instruf&o. 
Para tanto digits o comando, 

>LIST 

Apos o que a tela deve apresentar a lista abaixo. 

10 PRINT "TABELA DE MULT I PL I CACAO" 

20 PRINT 

30 PRINT, "X2" , "X3" 

40 PRINT 1, 1*2, 1*3 

50 PRINT 2,2*2,2*3 

60 PRINT 3,3*2,3*3 

70 PRINT 4,4*2,4*3 

80 PRINT 5,5*2,5*3 

90 PRINT 6,6*2,6*3 

100PRINT 7,7*2,7*3 

110PRINT 8,8*2,8*3 

120PRINT 9,9*2,9*3 

130PRINT 10,10*2,10*3 

140 END 

Passo 8 : suponha que apos termos verificado que todas as 
linhas estejam cor r etas nos lembremos que o 
programa deve inicialmente limpar a tela e so 
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enta"a executar a tabela, que devera ser apresen- 
tada a partir do inicio da tela. Neste caso, 
devemos incluir uma instruc^o HOME (que apaga os 
caracteres e posiciona o cursor na primeira 
coluna da primeira linha), em qualquer linha de 
programa de 1 a 9 (inclusive). Podemos digitar 
portanto : 

>5 HOME 

E interessante tambem que haja uma linha de divislfo 
entre os mul ti pi i cadores e mul t ipl i candos. para tanto, 
podemos emitir a ordem: 

>35 PRINT" " 



Agora aciona novamente o comando LIST e veri-fique a 
listagem do programa. 

Passo 9 : conferida toda a lista do programa, pode-se dar 
inicio a sua execu?a*o atraves de : 

>RUN 

Surge enta"o o seguinte, a partir da initio da tela : 

TABELA DE MULTIPLICACAO 

X2 X3 



1 




2 




3 






2 




4 




6 






3 




6 




9 






4 




s 




12 






5 




10 




15 






6 




12 




18 






7 




14 




21 






s 




16 




24 






9 




18 




27 






10 




20 




30 






i e 


t 


estado seu 


P 


ri mei ro 


programa 



Se voc£ digitou errado alguma instruct, ao inves de 
ser apresentada a tabela surgi ra uma mensagem de erro, indi- 
cando a linha na qual este ocorreu, na forma : 



'SINTAXE #ERRD EM 



Neste caso, digite o comando LIST e, na linha indicada 
procure localizar o erro. Uma vez localizado o erro, digite 
novamente a linha corrigida, utilizando o mesmo numero da 
linha anteriormente errada (lembre-se que no caso de duas 
linhas com a mesma numerate, prevalece a que -foi digitada 
por ul ti mo) . 
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V.3. USO DE DO IS PONTOS <:) NUMA LINHA DE PROGRAMA. 

Atrav^s do uso de dois pantos <:) podemos incluir mais 
do que urn comando nuna uni ca linha de programa. Par exemplo, 
no caso do programa apresentado no item anterior poderiamos 
rejunir i linha 5 e 10 digitando : 

>10 HOME : PRINT "TABELA DE MULT I PL I CACAO" 

Este arti-flcio tambem pode ser usado no MODO IMEDIATO. 

IV. 4. USD DE PONTO E VIRGULA <U APOS COMANDO PRINT 

ponto e virgula apos o comando PRINT -faz com que no 
proximo comando PRINT, o conteudo seja apresentado na mesma 
linha. Digite os e>:emplos a seguir e note a diferen^a: 



EXEMPLO 1 



>NEW 

>10 PRINT "TK-2000 COLOR' 
>20 PRINT "TK-2000 COLOR' 
>m END 

>RUN 



EXEMPLO 2: 



>NEW 

>10 PRINT "TK-2000 COLOR"" 

>20 PRINT "TK-2000 COLOR" 

>30 END 

>RUN 



FAfA D SEU RE5UM0 



1. A instruflta faz com que todo conteudo da 

memoria RAM do computador eeja apagada. 

2. Para que o programa apresente um conteudo f ixo ou que 
utilize caracteres al-f abet i cos deve— se asar a instruf So 
apos a qual digitar este conteudo entre ........ 

3. Todas os caracteres sa*o supri mi dos e o cursor se posicio— 
na na primeira coluna da primeira linha quando se utiliza a 
i nstruca*o , 

4. Para se verificar a 1 i stagem de um programa emite-se a 
comando ........... 

5. A execucSo de um programa e iniciada atraves do comando 



6. Psra que Lima linha de programa se j a registrada pelo 
computador, ap6s a sua digitat^&o deve— se prossionar a tecla 



7. Se -for dado o mesma numero de linha para dois comandos 
di-ferentes prevalece o 

B. Para se usar dois comandos em Lima mesma linha, eles dever 
ser separados por .......... (...) 

9. Desejando-se que dais comandos ............. exibam as 

respectivos conteudos na mesma linha da tela;, deve-se 

digitar um e ( ) ap6s o 

pr imei ro. 



respostas: 

1) NEW i 2) PRINT, aspas; 3) HOME; 4) LIST; 5) RUN 

6) RETURN ; 7) altimo? 8) dois pantos (:) 9) PRINT, ponto e 

virgula ( ; ) 
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CAPITULO V- OUTROS COMANDOS 

Neste capltulo voc# aprendera novas comandos, que ja 
1 he permitirSo desenvolver programas urn pouco mais so-fisti- 
cados. Antes porem, serKo apresentados alguns conceitos 
muito uteis durante a programaca'a. 



V.l. ALBUNS CONCEITOS ItlPORTANTES 

V.l.l. Dados 

objetivo principal do computador e receber determina- 
dos dados, manipula-los du pracessa-Ios, e entSo apresentar 
os novas dados. Desta maneira, e muito important© a -forma 
atraves da quail a linguagem de programa manipula tais dados. 
Dentro da linguagem BASIC do TK-2000 COLOR, existem dois 
principals tipos de dados, que sKo : cadeias e nameros. 
Seguem suas i nstrucftes : 

V.l.l. a Cadeia (String> 

Uma cadeia e qual quer sequencia de caracteres incluida 
entre aspas. Ja utilizamos cadeias com o comando PRINT para 
apresentar mensagens na tela, como par exemplo: 

>PRINT "TK-2000 COLOR" 
TK-2000 COLOR ■ 
>PRINT "COMPUTADOR" 
COMPUTADOR 
etc. . 

As cadeias podem ser formadas por uma -sequencia de a 
255 caracteres quaisquer, com exceccto de aspas ("). 

V. 1. l.b Nameros 

Existem dois tipos de n&meros que podem ser armazenados 
no TK-2000 COLOR: inteiros, e reais (tamb&m chamados nameros 
com ponto -flutuante), que podem ter parte -f raci onari a^ con- 
forme detalhado a seguir^ 

DBSERVAC0E5: 

1. Assim como nas maquinas de calcular, nos computa- 
dores o ponto (.) substitui a vlrgula que costuma- 
mos utilizer para separar a parte inteira do nume- 
ro de sua parte -f racionaria. Assim, o namero 3,27 
devs ser digitado 3.27 . 

2. Quando urn nfimero so tem parte -f racionaria, nSto e 
necessario indicar o zero a esquerda do ponto. 
Desta -forma o nftmero 0.527 pode ser digitado como 

.527 . 



51 



Urn inteiro e urn numero que n^o ten parte decimal e por 
isso nao tern virgula (ou no caso da computacSo, ponto) 

decimal. Um n&mero inteirD poderA ser precedido por urn hlfen 
<-)se ele -for negativo ou por um sinal mais ( + ) se positive. 
No caso de nao haver sinal, o computador o cansiderarS 
positive. Os nrlimeros inteiros devem ter valores na faixa 
entre -32767 e 32767. 

REAIS 

Um , numero -eal pode ser um numero inteiro, um numero 
com parte decimal, ou samente decimal. Da mesma -forma que no 
caso anterior, ele pode ser positivo <+) ou negativo CHi 
sendo assumido como positivo quando apresentado sem sinal. 

Os li mites para estes numeros sSo: -1E+36 ate 1E+36 ou 



- 1 000000000000000000000000(3001300 000000 
ate 1000000000000000000000000000000000000 

Exemplo : 5 ? -15, 65000, .5 , 24.0055, -64.2 etc;.. 



V.1.2. NotacSlo Cientifiea 

Numeros reais muito grandes ou muito pequenos ou seja, 
qualquer numero com mai s de nove algarismos a esquerda do 
ponto decimal ou mais proximos de zero do que -0,01 ou 0.01, 
conforme representa a -Figura abaixo, sl(o representados no 
TK-2000 COLOR atraves da Notacao Cientl-f ica. (f ig„ V. 1 ) 



999999999 -Q.OI 






- numeros. expresses em notap&o cienti-fica 

Fig. V.l. 

Um numero na Notasa'o Cientifica tem a forma : 

numero E + . ee 

onde, o nCtmero e inteiro, fracion&rio ou com parte intei ra e 
frac ion aria., 

A porcSo numerica que contem a parte das digitos signi- 
-fieativos e chamada coe-f iciente. 

E § sempre a 1 etra "E", El a substitui a palavra expoente. 

+ corresponde a positivo ou negativo. 

ee e um expoente de um ou doi s algarismos. expoente es- 
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pecifica a magnitude do n&mero, isto e, o nftmero de ca- 
sas a direita (se a expoente -for positivo) ou a esquer- 
cia (se -For negative) que o ponto decimal deve ser 
deslocado, para dar a sua local iza^^o no conjunto dos 
n&nieros reals. 

Hwguem alguns exemplos de NotacKo Cientifica 



Nota^lto Usual 


Nota^o Cienti-fica 


1000000000 
.000000001 
*« 1 000000000 
-■0.0000123456 


1 E+09 

1E-09 
- 1 E+09 
-1.23456 E-05 



Ds valores li mites da NotacSo Cientifica s&o 



n&meros positivos : 1 E-38 e 
nflmeros negatives : -1 E-3S e 



1.7 E+3S 
-1 .7 E+38 



V. 1.3. Arredondamentos 

Ja mencionamos antes que, os n&meros reais pad em ter no 
II 2000 COLOR ate nave algarismos de precis^o. Para nQmeros 
nii*i ores que 1 ou menores do que -1, isto significa que, na*o 
IMiffi da que nove algarismos podem ser di-Ferentes de zero. 
II V.000 COLOR aprowima todos as n&meras com mais de nove 
• I u^rismos. Seguem alguns exemplos para voce e>:ecutar no TK- 
i&m COLOR. 

>PRINT 1234567B91 
1.23456769 E+09 

>PRINT -12345678912345678? 
-1.23456789 E+17 

SPRINT -150000475.75 
-150000476 

>PRINT 90000000.7558 
90000000 . 8 

N&meros -fracianarios (entre 1 e -1) est^io sujeitos as 
inwt.nu.'ua limitacoes. Nestes eases, entretanto, os nove alga- 
i' I Minos de precisa'a comecam a ser contados a partir do pri- 
niMlru algarismo di-ferente de zero a direita do panto 
ilwilmal. Por exemplo: 

>PRINT . 1234567894 
. 123456789 

>PRINT .001234567894 
1.23456789 E-03 
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V. 1.4. Variaveis 

Se voce conhece Algebra elementar, riSo tera dificul 
em entender o que e Lima variavel. Caso contrSrio, imagi 
variavel como um ratulo que especi-fica uma caixa. Sup 
que a name do rfttula que especi-fica nossa caixa e TI. 
pusermos uma tesoura dentro desta caiiia, cada vez 
quisermos nos referir a tesoura podemos chama-la de 
Assim, se quisermos a tesoura poder etnas solicitar "Par 
vor , me de a caixa TI" on simplesmente "Por favor, me d£ 
TI". Para guardarmos a tesoura poderemos diser "Guards 
Podemos tirar a tesoura da cais<a TI e colocar dentro 
urna reo.ua. Neste caso., quando nos menci onarmos a caixa 
passaremos agora a nos referir a uma regua e n=to mais a 
tesoura. 



dade 
ne a 
onha 

que 
TI. 

-fa- 
ll". 
del a 
TI, 
uma 




Fig V.2 

■ 

Como voc^ pode ver, a variavel i apenas uma etiqueta ou 
um nome que se pode associ ar a qualquer constante. Caso vo- 
ce nUa tenha captado bem o conceito de variaveis os exemplos 
do proximo Item (LET) deixara a ideia mais clara. 



V. 1.5. Nome de variSveis no BASIC do TK-2000 COLOR. 



name de uma variavel pode ter qualquer tamanho, mas 

apenas os dois primeiros caracteres serSo reqpnhecidos como 

notne pelo BASIC do TK-2000 COLOR. Para se determinar este 
nome deve~se observar as seguintes regras: 



















• 



















Qltimo caracter: 



*: para variavel do 

tipa cadeia 
"/.'. para variavel do 

tipo inteira. 
Nenhum simbolo para 
variaveis reals. 



segundo caracter: (opcional) pode ser 

qualquer I etra ou 
1 dlgito. 

primeiro dlgito: e necessariamente 

uma letra. 



Mptamos entKa que pademos ter tr£s tipos variiveis de 
iCtirdO com o tipo de dados que elas contem: as. variavsis 
I ||m:j cadeia,, que s&o relacionadas com qualquer con junto de 
«l« 233 caracteres ( com e>;cessa"a das aspas), as variaveis 
i nl fc'j. ras que corresponded) a n&meras sent parte -fraci onari a, e 
M variaveis reais aasociadas a qualquer namero inteiro, 
I r .11 i, nnario on com parte inteira e fracion^ria. 



V.2. LET 

No J tern anterior discutirnos a respeito das variaveis. 
I'nl", neste item vamos aprender como, atraves do camando LET, 
i i • 1 ..11 I Dnamos urn norne de variAvel a urn valor constants. Digi- 
ts (mi. eKemplos abaixo e ver :i, f i que os resultados: 

MH'ir RVAQOES : |« N&o esqueca de pressionar RETURN ap&s as 

linhas de comando 
2- Os resultados das instructs r.o TK-2000 
COLOR,, serSo aqui apresentadas logo abaixo 
das iiiesmas. 

>LET TI* - "TESOURA" 

>PRINT TI* 

TESOURA 

Atribuimos bo nDme-de-variavel TIB a cadeia TESOURA, 
logo, qua-ndo pedimos para o computador apresentar a variSvel 

I Ms Hie apresentou a cadeia "TESOURA". 

>LET TI* = "REGUA" 

>PRINT TI* 

REGUA 

Agora, lisemos com que o nome-de-vari&vel TI* passe a 
Itw p placianar v:am "REGUA". Portanto, quando ordenamos que o 

II .'000 COLOR apresentas.se a variavel TI* suirgiu a cadeia 
l>1 LHJA« Note que? o sinal de cifr&o <*> no -final do nome da 
v.«r i Aivel se -faz necessario por se tratar de uma cadeia. 

fambem, de acordo cair\ a regra vista no sub- J tem ante- 
i tar „ pademos utilisar apenas uma letra e o caracter * para 
ilwfinir o nome de uma variavel tipo cadeia. Exemplo : 

>LET Eft « "TK-2000 COLOR" 
>PRINT C* 
TK-2000 COLOR 

Na realidade, a comando LET e opcional, de -forma que 
litidwmos omiti-l o para e;<ecutar a associafSo entre urn nome- 
ilti variavel e o seu valor. Por exemplo : 

■A* « "COMPUTADOR" 
PRINT A* 

I IINCUTADOR 



Lembre-se, uma variavel pode ser associada a somente um 
valor par vez, partanta se lhe atribuirmos um novo valor, o 
antigo sera suprimido. Assim, se digitarmos : 

>A$ = "TUDO EEM" 

ao digitarmos o comando : 

>PRINT A* 

- 

d TK-2000 COLOR apresentara a cadeia : 
TUDO BEM 

Agora digi te .: 

>LET DB$ = "CINZA" 

>PRINT DS* 

CINZA 

>LET 5F$ = "VERDE" 
7S I NT AXE #ERRD 
I 

Note que no segundo caso, utilizando o nome 5FS, 
quebramos uma das regras de -forma^eto dos nomes-de-var i avel , 
pois, um namero nSo pode ser o primeiro caracter do nome. 
Para carrigir este erro podemos digi tar por e:-:emplo: 

>LET F5* = "VERDE" 

Veja agar a, este exemplo : 

LET X* - 7 
7INC0MPATIVEL #ERRO 

A mensagem de erro -foi apresentada por que utilizamos um 
nome-de-variavel do tipo cadeia team o simbolo de ci-fr&o no 
lugar do ultimo character) para de-finir uma variavel real. 
Utilizando agora a -forma correta. 

>LET X = 7 

>PRINT X 

7 

Nos exemplos a seguir, procure prever„ antes de 
executar no computador, o resultado dos comandos. 



>C m 57 
>PRINT C 



b) 



t:) 



>LET D = 25.27589322 
>PRINT D 



>LET E = 72! 
>LET E = 10 
>PRINT E 



d) 



>LET F = 5 
>LET W = F 
>PRINT W 

e) 

>LET G = 2 
>LET H =13 
>LET I = G + H 
>FRIIMT I 

Se suas previsfles forem corretas, voce - j a deve estar 
per Lobenda a versat i 1 idade e util idade das variaveis. Case 
nllQ tonha entendido algum exemplo, releia os Itens anterio- 
i ww deste capltulo e procure faier sens pr&prios exemplos 
liftra melhor compreensao e * i :<af a*o. 

No decorrer deste livro, dificilmente sera usado "LET", 
PQPfem, se voce: encontra-lo em algum programa, sabera o gue 
wit? signi-fica e que pode per-f ei tamente ser supra, mi do, du 
■•jAf as comandas : 

>LET B* m " ABC27. ft?" 
>LET N = 10 

■..'(ii 9H a tamente iguais a : 

>B* = " ABC27. #?" 
>N = 10 

i run a vantagem que a segunda -forma e mais rapida de digitar 
■ DCupa menos memftria do computador. 



V. 3. GOTO 

Este comando deve ser digitado no -Formato : 

>GQ TO numero . 

Ond:R "numero" indica urn numero de linha para o qual a 
in ograma deve ser desviado. 

Vamos entender melhor. Para ilustraca'o, suponha que se 
qU*ira -fazer urn programa que apresente o nome TK—2000 COLOR 
nn lnlcio de todas as linhas da tela. Para tanto digite 



i ni ci al mente o camando NEW para limpar toda a memoria do 
computador, e em seguida :' 

>10 HOME 

>20 PRINT "TK-2000 COLOR" 

>30 GOTO 20 

>RUN 

e veja o resultado na tela- Guando quiser interromper o 
programa, digite o con junta de teclas CONTROL C on as 
teclas RESET. A figura V„3 indica o -FIuxd do pragrama. 

RUN <da inlcia a execucefo do programa) 

HOME (limpa a tela e posiciona o cursor em seu inlcio) 

PRINT "TK-2000 COLOR" (apresenta TK-2000 COLOR na tela) 

SO TO 20 (desvia o programa para a linha 20) 



Fig V.3. 

Vamos agora modi-ficar um pouco o programa, 
inicialmente NEW e em seguida ; 

>10 HOME 

>20 PRINT "TK-2000 COLOR" 

>25 PRINT 

>30 GOTO 10 



digi tando 



Repare agora que o name TK-2000 COLOR fica piscando 
na primeira linha da tela. novo -fluxo do programa passa a 
ser apresentado na fig. V.4 

RUN 

HOME < 

I 

PR TNT "TK-2000 COLOR" 

X 

PR TNT 

I 

GO TO 10 
I 



Fig. V.4. 

Note que enquanto vac£ na*o interromper o programa 
(atraves de um CDNTROL-C) ele continua radar indef inidamen- 
te, pois sempre que alcanna a instru^o GOTO, o pragrama e 
desviado para uma instrutjKo anterior a ela. Portanto, neste 
caso na"o adianta incluir uma instru^Sto END ap6s GOTO;, pois o 
programa nunca a atingira. 
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V.4. INPUT 

-formato utilizado par esta instrufHo £ 
INPUT nome-de-var iavel C , nome~de-vari Svel , ... 



) 



Este comando, assim como LET permite uma associacSo 
intre urn nome-de-var iavel e o seu valor. Digite o exemplo: 

>NEW 

>10 HOME 
>20 INPUT A* 
>30 PRINT A$ 
>40 GOTO 30 
>RUN 

Surge ent&o no canto esquerdo da tela um ponto de 
l nt; err oga£a*o e o cursor? conforme se v& na -Figura V.5. 





I ig. V.5 



I 



Portanto a instrusa'o "20 INPUT A*" executa entSo as 
u.i>gu:i. ntes operacftes : 

I. apresenta urn ponto de interroga^So na tela! 

V. &c: ion a o cursor* 

"» espera pela digita^Sta de alguma cadeia. Quando a cadeia e 
digitada e a tecla RETURN pressi onada, fas com que esta 
Beja associada a var i&vel A* e s6 ent&o permite que o 
programa prossiga para a proxima linha de comando. 

Para prosseguir o programa vamos digitar o nome JOAO e 
p M'- i ;si si on ar a tecla RETURN. Observe ent&o o resultado na tela 
t para interromper o programa, pressione CQNTRQL-C) . 

Se houver varias variaveis num INPUT, deve ser digitado 
atributo a uma variavel por vez repetindo os passos 1,2 e 
*■ tsntas vezes quanto variAveis ex i stir no comando. 

Uamos agora a mais um exemplo. Digite os comandos : 

>NEW 

>10 HOME 
>20 INPUT N$ 
>30 PRINT N* 
>40 GOTO 20 
>RUN 



A -figura V. 7 indica o f lu>;ograma do programa anterior: 

RUN (da inicio ao programa) 

INPUT N$ (apresenta o ponto de interrogafSa e o cursor na 
tela, aguardando a digitaca'o de ama cadeia para^ 
associar ao nome de variavel N$) 

PRINT N$ (apresenta na tela o valor associado a N*) 

I 

GO TO 20 (desvia o programa para a linha da instrufclo INPUT) 



Fig. V. 6. 

Apos o ponto de i nterragaca'o, digite o nome "PERLA" 




PERL A I 



Fig. V.,7. 

Ap&s pressionar a tecla RETURN, a tela passa a 
apresentar : 



? PERLA 

PERLA 

?■ 



Fig. V- 8. 



Desta -forma, o computador apresentara as cadeias que 
voce digitar ap&s o ponto de interrogacaXo, ate que se pres- 
sione o con junto CONTROL C, i nterrompendo entSo o programa. 

V.4.1. Incrementando a Instrup&o INPUT 

De acordo com o que vimos ate. agoraj o comando INPUT 
apresenta o ponto de i nterrogac&o. e o cursor na tela, aguar- 
dando enta"o que se digite uma cadeia e a tecla RETURN. E 
interessante, entretanta, que seja apresentada tamb&m uma 
mensagem ou urn incremento indicando qual a cadeia que se 
deseja,. Digite no TK-2000 COLOR o programa abaixo : 



>NEW 

>10 HOME 

>20 INPUT "QUAL SEU NOME 7 

>30 PRINT N$ 

>40 GOTO 30 

>RUIM 



: N* 
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Vamos analisar o que a .instrusSo da 1 i nha 20 executa : 

a) interrompe o prograrna 

b) apresenta na tela a *rase "QUAL E SEU NOME ? "; 

c: ) aguarda a digitac&a da cadeia, seguida pelo pressi on amen- 
ta da tenia RETURN; 

d) associa a cadeia digitada ao nome?~de~var iavel N*. 

A -forma do comando INPUT incrementado e a seguinte : 

<INPUT> <"> <texto> <"> <;> <variavel> ; < vari avel >. . . 

repare que os slmbolos menor que (<) e maior que (>) tern 
apenas efeito i lust rat ivo para separar cada uma das partes 
d.D comando e portanto n&o devem ser digitados. Tamb&m e 
importante notar que, quando utilizamos o incremento, temos 
de acrescentar o sinal de i nterrogac^a'o (?) dentro deste, 
pais o TK-2000 COLOR, neste caso nSo imprime a inter roga$:a"a 
automat i camente. 



Ao se digitar a comando RUN e a tec la RETURN, 
I; e 1 a do TK-2000 COLOR ( ,-f i g . V . 9 ) 

fQUAL. E O SEU NOME? I 



surge na 






Fii 



V.9. 



Digitando agora o seu nome (suponha que seja PAULO) „ o 
lnJci.0 de todas as linhas da. tela ser So preenchidas com ele, 
conforme indica a figura V„ 10 : 



r OUAL E SEU NOME 7 PAULO 

PAULO 

PAULO 

PAULO 



Fig.y. 10. 



V.4.2. Uso de INPUT cocn Var lave is Numeric as 

Podemos tambfem usar a instru^a'o INPUT para relacionar 
var iaveis numericas, como se ye no exemplo a seguir. 



>NEW 

>10 HOME 
>20 INPUT A 
>30 PRINT A 
>40 PRINT 
>50 GOTO 20 






Vamos eMaminar o -fluxograma deste programa (fig.V.ll) 

HOME Climpa a tela) 

i 
INPUT A (apresenta o ponto de i nterroga?3to e o cursor, ^ 
aguardando a digitaca*o de um nflmero real a ser 
relacionado com o nome-de-variavel A) 



PRINT A (apresenta o valor real associado a variavel A) 

PRINT Cdeixa Lima linha em branco) 

GO TO 20 (desvia o programa para a instruca'o INPUT A) 






Fig. V. 11. 

Apos o comando RUN, o ponto de interrogaccfo e o cursor 
surgem ns tela. Digitando o numero 521 e pressionanda 
RETURN, a linha seguinte apresentara este nCtmera e ap6s uma 
linha, o ponto de i nterrogac^o e o cursor surgirKo novamente 
na tela. Podemos em seguida dig! tar outros numeros como -67, 
5.32, etc.. Note que os nCimeros n^o devem ser digitados 
entre aspas, e se isso acontecer, o TK-2000 COLOR n£o acei- 
tara e emitira uma mensagem de erro. A -figura V. 12 
represents o que. -Pol descrito : 




'"icr ^f-i 



?REDI6ITE 



?■ 
Fig.V. 12. 

Devemos observar ainda que, 



podemos associ ar um n&mero 
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intra asp as 
I 'or «k tempi q 

A$ 



ao nome de uma vari<avel de tipo cadeia. 



I m ik' ("mii, neste caso, este numero nSo podera ser usado em 
ii|in->r affiles ar i tmet i c as, a nSo ser atrav&s de uma determinada 
uistruca'a que sera vista posteriarmente. 



V. 



REM 



Buanda utili^amas pragramas curtos, £ bastante -f&cil 
I utubranitos, mesmo apos algum tempo., a que cada parte deste 
pi nctrama est& executando, porem com o passar do tempo e a 
wnf ;Usti cat a" a dos programas esta tarefa se torna cada vez 
fflAitt da. -Hcil, ou seja, depois de alguns meses, s6 urn indivl- 
iImd cam muita baa memfiria pode lembrar a sequertcia lcbgica de 
inn pragrama de 200 linhas, imagine entcio varios pragramas 
i <)i\\ este numero de linhas. 

Para solucionar este problems, existe a in struma REM, 
qiu» permit* acrescentar lembretes ou coinentariDs dentro de 
Uffl pragrama,, sem que o computador tome qual quer conheci- 
fftHntp* Desta -forma, se as tres primeiros caracteres de uma 
linha de pragrama forem REM, durante a execute da pragrama 
tilt A linha e ignorada. Exempla : 

>NEW 

>10 REM QUADRADG DE UM NUMERO 

>20 INPUT "QUAL E G NUMERD?"; A 

>30 PRINT 

>40 PRINT A- -2 

>50 PRINT 

>60 GOTO 20 

>RUN 
que durante a pragrama surgira apenas a pergunta 

NUMERO?" e, apos digitado o nurhero e a tec la 
RETURN, o valor deste ao quadrado. Porem sempre que listar- 
(RfflB o pragrama (atraves do comando LIST) , a linha 10 nos 
I ndicarA que a -finalidade deste e elevar urn numero ao 
quwdrado. 

0b programadores exper i entes utilisam -f requentemente 
MMite recurso. 

Para concluirmos, digite o pragrama. 



Nate 
"UUAL E 



>NEW 

>10 REM CALCULO DA AREA DE UM RETANGULD 

>20 INPUT "QUAL VALOR DO PR I ME I RO LADO ?";A 

>30 PRINT 

>40 INPUT "QUAL VALOR DO OUTRO LADO *f. "iB 

>S0 PRINT A*B 

>70 PRINT ; PRINT 

>80 GOTO 20 

>RUN 
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FACA SEU RESUMO 

1. O principal abjetivo do computador e receber 

manipula~los e apresentar entSa novos 

2. Uma e constitulda por qualquer sequ&ncia de ate 

239 caractere^ incluldos entre 

3. Urn namero real pode ser , parte ........ e 

parte ou somente 

4» Numeros com mais de ...... al gar i smos a esquerda do ponto 

decimal, ou dentro dos li mites de -0.01 e +0.01 (exceto 
zero) sSo representados atraves da 

5. No TK-2000 COLOR os names das variaveis do tipp cadeia 
clevem ter urn ou dois caracteres seguidos pelos simbolos de 
....... (..) , sendo que o primeiro carscter deve ser neces- 

sariamente .„ ., Os names das variaveis reais 

seguem a mesma regra, por em, o slmbolo de nKq deve 

ser acrecentado no -final. 

6. A associate entre urn nome-de-var i avel e sen valor pode 
ser feita di retamente, ou entSo atraves de urn comando 



7. D comando permite desviar a execu^a'a do 

programa para qualquer numero de linha pre-determi nada. 

S. D comando INPUT executa as seguintes tare-fas : interrompe 

o programa; apresenta urn n a tel a 

seguido pel o ; aguarda a digita$:a"o do a 

ser associado com o nonte-da-var iavel pre-determi nada. e o 
pressianamento da tecla 

9. Ds termos necessarios para se utiliaar o comando INPUT 
increment ado sa"o: 

< INPUT > <...>< ><...>< > < > 

10. Urn recurso -f requentemente usado para a mais rapida 
compreensSo de urn programa e a inclusSto de comentarios ap5s 

a instrue&o , os quai s s^o ignorados pelo 

computador durante a execuc&o do programa. 



respostas: 1.. dados, dados; 2. cadeia, aspas? 3.inteira, 
inteira, fracionaria, fracionario; 4. nave, Notacao CientJ- 
■ficaj 5. ci + r^to (*) , uma letra, ci-fra"o; 6. LET; 7. GO TO; 
8. ponto de i nterrogaca"o, cursor, dado, RETURN; 
9. " , incremento, " , ;, nome-da-var iavel ; 10. REM 
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CAPITULO VI A INSTRUCflO <FDR . .NEXT> E TECNICAS DE EDICAO 



VI. 1. FDR NEXT 

A instru^io FOR., , , „ „ NE XT e na realidade dividida pan 
d'MftS or dens que? sa'o: 1 ardem FDR e b. ardeni NEXT . El & tern par 
■I ;i. rial :i dade b&sita repetir um cleterminada numero de vezes, as 
.1. i 'ii;itr"'i..i(j;f?fes que se encontram entre as ordens FDR e NEXT. F'or 
' M-mplo, d:i. gi te: 

>NEW 

>10 HOME 

>20 FOR I - 1 TO 5 

>30 PRINT "TK-2000 COLOR" 

>40 NEXT I 

>50 END 

>RUN 

Como vac& pode observar,, □ name TK-2000 COLOR foi 
►ip resent ado cinca vezes na tela. Vamos analisar & -formato 
g (ffl r a 1 d bs t a i n «s §r-pg pa ° 

■ FOR> <nome-~da- var :L livel -real ><==>< val or inicial da variavel> 
I ('.')> <valor -final da variavel > 



1:1, iihas de instrui^des a serein repetidas 



NEXT) <nome-da-variayel > ( , < nome-da-var i a vel > ) 

A de-finier&o da instru^^a FOR.,. .-NEXT deve ser -feita 
i 'i it Ho, digitando-se : 

a) FOR e em seguida atribui~se urn valor inicial a urn 

nome-de-'variavel ; 

b> TO j apds o que o m&Kimo valor que a variavel deverA 
assumir (valor -final da vari&vel); 

c) As linhas de instru^ftes que se deseja repetir "n" 
vsibe; onde "n" e a di-feren^a entre a valor -final 
ffienos o valor inicial da variavel dli o maior valor 
inteiro me nor que a di-feren^a +1. 

<n> ■" (<valor -final > - <valor inici al 5 -) j 

d) Apos a tiltima linha que se deseja repetir, a ordem 
NEXT seguida sozinha ou acampanhada por um ou dois 
nomes-de --var i Stvei s teste (liltimo separada por 
vlrgulas) depend en do do caso. 



D funcionamento desta instrucSo e ent&o: 

a) computador veri-fica se a valor inicial da variavel 

e menor que o valor -final da mesma* 

b) Se -for menor, -fas cam que o programa prossiga 
narmalmente, at& encontrar a ardem "NEXT <nome da 
variavel >". Neste momenta o valor inicial da 
variavel e acrescida de uma unidade . 

c) novo valor da variavel (valor inicial+1) e 
novamente comparado com o valor -final da variavel e 
se ainda -for menor , pula para a linha seguinte a 
FOR e o ciclo se repete: as instru^Ses do programa 
sSto ex ecut ad as normal mente ate que se encontre a 
ordem NEXT,, quando entSo o novo valor da variavel e 
acrescido de mais uma unidade, passando 
valor inicial +2, e e-fetua uma nova 
entre o valor atual (inicial +2) e o 
var i avel . 



a valer o 

comparac a*o 

•final da 



d> ciclo acima, se repete at£ que o valor da 
variavel se iguale ou seja mai or que o valor final 
desta (de-finido na linha da ordem FOR, apos a 
palavra TO). Neste momenta, ele nSo pula para- a 
linha seguinte do FOR e sim continua executando na 
proMima instruca'o apos o NEXT. 



Para tprnar mais claro a que -foi descrito, vamos 
executar o seguinte programa : 

. >NEW 

>10 HOME 

>20 FOR N = 1 TO 3 

>30 PRINT N 

>40 NEXT N 

>50 PRINT ,( JA! " 

>60 END 

Apfls utilizar o comando RUN, a tela contera os 
seguintes caracteres indicados pela figura VI. I ". 




Fig VI. 1. 

« 

A -figura VI. 2 descreve o -fluxa deste programa : 
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HOME (limpa a tela e posiciona o cursor em seu inlcio) 

I 

FDR N = 1 TO 3 (faz inici almente N = 1 e compara com 3) 
PRINT N (apresenta 1 na tela) 

I 

NEXT N (faz N=l+l=2e compara com 3) 

I 

PRINT N ( apresenta 2 na tela) 

I 
NEXT N (faz N = 2 •*■ 1 = 3 e compara com 3) 

m 
PRINT N (apresenta 3 na tela) 

NEXT N (faz N = 3 + i = 4 e compara com 3) 

I 

PRINT "JA>" (apresenta JAf na teLa) 

END (-final iza o programa) 



My. VI. 2. 

Procure agora observer as seguintes linhas de programa: 

a) 

>10 FOR X m 1 TO 5 

>20 PRINT X 

>30 NEXT Y 

b) 

>10 FOR A$ = 1 TO 7 
>20 PRINT A* 
>30- NEXT A$ 

Se voce as tentou executar, verificou que em ambos os 
( ««tus foram apresentados mensagens de erros e os programas 
nfto funcionaram. Isto porque no caso a, -foi usado um nome de 
variavel na ordem FOR e outro nome na ordem NEXT. No caso b, 
u irro esta em se utilizar um nome de variavel do tipo 
I t(jiia f ou seja, as variaveis utilizadas nas instruceUes- 
MIH....NEXT devem ser necessariamente reais e inteiras. 



Kh incut e 


os seguintes 


programas 


a) 


>NEW 
>10 HOME 










>20 FOR I = 


1 


TO 


5 




>30 PRINT I 










>40 NEXT I 










>50 END 










>RUN 
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b) 



c) 



>NEW 

>10 HOME 

>20 FOR K = 3 TO 5 

>30 PRINT K 

>40 NEXT K 

>50 END 

>RUN 





>NEW 




>10 HOME 




>20 FOR A = TO 3 




>30 PRINT A 




>40 NEXT A 




>50 END 




>RUN 


d) 






>NEW 




>10 HOME 




>20 FOR Z » 1 TO 1 




>30 PRINT 2 




>40 NEXT Z 




>50 END 




>RUN 


Os 


exemplos anterion 


n&meros | 






a) 1, 2, 3, 4 e 5 


• 


fa) ^3, 4 e 5 




c) 0, 1, 2 e 3 


, 


d) 1 



Pode-se ainda reunir varias ordens numa £inica linha de 
programa. Desta -forma os exemplos a e b poderiam tamb^m ser 
escritos da seguinte forma : 



a) 



b> 



>NEW 

>10 HOME 

>20 FOR I = 1 TO 5 : PRINT I : NEXT I 

>30 END 



>NEW 

>10 HOME 

>20 FOR K = 3 TO 5 ; PRINT K : NEXT K 

>30 END 



68 



Verifique que, quando varias instru^o'es sa"o digita- 
<U«> noma unica linha (sempre separadas por dois pontos) , 
Vl Kfi sa"a executados da esquerda para a direita da linha, Por 
UfflU questa"o de estetica, e conveniente (mas na*a necessaria) , 
qut antes e depois dos dois pontos sejam dei x ados um espa^o. 
(write agora votz& mesmo escrever os exemplos c e d num menor 
llbflittrd de linhas. 

potencial desta instru;Ko e muito grande. Nesta se^o 
ilaremos um exemplo da aplica^a'o de FOR. ..... NEXT num 

arti-ficio matematico e descreveremos a -forma de utilizafSo 
I'lwiiita para se determinar um "tempo de espera" dentro de um 
pf ngrama. Outras aplica§:des serSio vistas em capitulos poste- 
r lores, porem estaremos longe de esgotar o assunta. 



Vl.l.l.-Umo de FDR NEXT como Artiflcio Matematico 

D programa exemplo que i remos deserever tern por -fun^^lo 
i omputar a soma dos inteiros, positivos entre 1 e N. Digite: 

>NEW 

>5 REM CALCULO DA BONA DE INTEIROS POSITIVOS ENTRE 

1 E N 
>10 HOME 

>20 INPUT "N = "?N 
>30 S = 

>40 FOR I m 1 TO N 
>50 S = S + I 
>60 NEXT I 

>70 PRINT "A SOMA E " J S 
>80 BD TO 20 



A variavel S ( que no caso indica soma) e usada nas 
linhas 30, 50 e 70. Na linha 30, que e processada antes do 
i nmando FDR, o valor zero e atribuldo a ela. A linha 50, 
enl re os comandos FOR e NEXT e executada para 1=1, 1=2, 
1^3 e assim por diante ate I = N e o novo valor de S 
p!ftft&A a ser : 






valor mais recente de 



de-f ini do 



pela instru^cto FOR NEXT 

ultimo valor atribuldo a S 
novo valor atribuldo a S 



Por exemplo, suponha que se atribua o valor 3 para a 
variavel N, EntSo S tera os valores : 

] lnha 30 S - 

L BKecu^ato da linha 50 S = S+I-0+l 



2 executes da linha 50 S = S + I -■ 1+2 = 3 

Ultima execuc3to da linha 50 S = B+I=2 + 3 = 6 

Vamos iniciar a execuca-o do programa (atraves do coman- 
do RUN). A -figura VI. 3 apresenta alguns exemplos: 



N = 3 

A SOMA E 6 

N = 4 

A SOMA E 10 

N = 7 

A SOMA E 28 

N * -| 



^ 



Fig. VI. 3 



VI. 1.2. Uso de FOR.... NEXT como Tempo de Espera 

Execute no sen TK-2000 COLOR as dais eKemplos a seguir 
<para interrompe-los digite CONTROL C ) : 



>NEW 

>10 HOME 

>20 PRINT "TK-2000 COLOR" 

>30 GDTO 10 

>RUN 



>NEW 

>10 HOME 

>20 FOR I = 1 TO 500 

>30 NEXT I 

>40 PRINT "TK-2000 COLOR" 

>50 FOR I = 1 TO 500 

>60 NEXT I 

>70 GOTO 10 

>RUN 



OBSERVACBO: 



Ap&s digitar RUN, aguarde mn instante para que 
surja o none TK-2000 COLOR na tela. 



Como voce pode obser'var, no primeiro caso nSto se conse— 
gue ler o name TK-2000 COLOR que pi sea na tela. Jano caso b, 
os interval as de tempo em que a tela -fica em branco e em 
seguida que aparece a nome TK-2000 COLOR na tela s3(o bem 
maiores, que acontece na realidade, e que quando incluimos 
na linha 20 a ordem FDR I = 1 TO 500 e logo em seguida (sem 
que ' haja nenhuma outra instruct entre eles) , o comanda 
NEXT, -fizemas com que a computador "conte" internamente, de 
1 a 500 e so entSo prossiga o programs. mesmo acontece na 
linha 50. Na real idade o tempo de contagem e muito rapido 
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(inwntm que 1 segundo) , porem su-ficiente para ser percept 1- 
vm\ . diagrama a seguir representa o fluxo da programa. 



Ili!) HOME (apaga a tela e posiciona o cursor em seu inicio)^- 



1 



FOR I - 1 TO 500 (atribui inicialmente d valor 1 a I e 

campara-o com 500. Esta compara^a'o e 
repetida para os novos valares de I 
ate que I = 500, apes o que a proxima 
ordem NEXT e ignorada) , 

ii I (acrescenta 1 a variavel I e desvia o programa 
para a ordem FOR anterior - 1 i nha 20 



1 



'W PRINT "TK-2000 COLOR" (apresenta o name "TK-2000 COLOR") 

*iffl FOR I = 1 TO 500 (similar a ordem da linha 20) 

ttf NEXT I (similar a ordem da linha 30, porem note que agora 
a ordem FOR anterior se encontra na linha 50) 

/Ifl GO TO 10 (desvia o programa para a linha 10) 



VI. 4. 



Se agora quisermos que o nome TK-2000 COLOR pisque mais 
I null amen te, basta aumentar as contagens e-fetuadas pel o 
jtrngrama, substi tuindo, por exemplo, as linhas 20 e 50 por: 

>20 FOR I = 1 TO 1000 
>50 FOR I = 1 TO 1000 

De forma inversa, para que TK-2000 COLOR pisque mais 
t*pldamente, devemos diminuir as contagens realizadas pel o 
|iM(qrama„ aiteranda as linhas 20 e 50 . EKemplo : 

>20 FOR I = 1 TO 100 
>50 FOR I = 1 TO 100 



Para terminar, esta se^So, execute o programa abaixo e 

mwrve o resultado: 



>NEW 
•10 REM 



20 

30 
40 
50 
60 
70 
80 
90 
1 



EDUCANDO TK-2000 COLOR 
HOME 

PRINT "MEU NOME E TK-2000 COLOR" 
FOR B = 1 TO 800 : NEXT B 
REM OBTENDO SEU NOME 
HOME 

INPUT "GUAL E SEU NOME 
PRINT "PRAZER EM CONHECE 
FOR C M TO 1500 : NEXT 
GOTO 20 



?"?N*: PRINT 

LO "UN* 
C 



71 



VI. 1.3. STEP 

* 

Ate agora, sempre que utilizamos FOR NEXT, a cada 

vez que o programs passava em NEXT, o valor da variavel 
indicada na ordem FOR era acrescida de uma unidade, ate que 
seu valor se igualasse do valor -final. Podemos entSo dizer 
que o passo padrSo da instrufSo FOR NEXT e 1. 

passo da instrUcSo FDR.... NEXT pode ser alterado 
acrescentando-se junto a FOR a ordem STEP. Observe o 
e;<empl o: 



>NEW 












>10 


HOME 












>20 


FOR r = 


■0 


TO 


10 


STEP 


At 


>30 


PRINT 


I 


• 








>40 


NEXT I 












>50 


END 













Apos a ordem RUN,, os numeros 0,2,4,6,3 e 10 ser So 
acrescentados na tela. Como podemos concluir, a cada 
instruc&o NEXT a -variavel I passou a ser incrementada com o 
valor indicado ap<bs a ordem STEP. 



VI. 2. TECNICAS DE EDICBO 

Em capitulos anteriores ja apresentamos a -forma atrav&s 
da" qual voce pode corrigir erros em uma linha de programs, 
antes de ter digitado a tecla RETURN. Vamos reve-las 
rapidamente. i 

a) a tecla < 4— ) movimenta a cursor para esquerda de 
forma que os caracteres que ficarem a direita dele 
ser So ignorados, ou seja, embora permanecam na tela 
n&o ser&a registrados na memoria do TK-2000 COLOR; 

b) a tecla ( — > ) movimenta o cursor para a direita, 
tornando os oaracteres de uma linha validos, a 
medida que o cursor passe por el ess 

c) o con junto de teclas | C0NTRQl1 [x] -faz com que a linha 
em que se encantra o cursor seja ignorada* 

d) o comando HONE apaga toda a tela e leva o cursor 
para a primeira posica"o da primeira linha. 



Veremos a seguir as novas t&cnicas de edic&o especial 
mente uteis no MODO PR'OQRAMADO. 



V.2.1. Supress^o de Linhas de Programa (Comando DEL) 

Para suprimir uma linha inteira do programa, basta di~ 
gitar o numero desta linha e logo em sequida pressionar a 
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tec la RETURN. Por exemplo, suponha que a programa abaiito -foi 
editado : 

>NEW 

>10 REM PROGRAMA EXEMPLCJ 

>20 HOME 

>30 INPUT "QUAL SEU NOME" ; N* 

>40 PRINT N* 

>50 HOME 

>60 PRINT "ESTE E COMPUTADOR TK-2000 COLOR" 

>70 END 

Desejamos entSo suprimir a linha 50: 

>50 < RETURN > 

Agora emitindo-se o comando LIST teremos : 

10 REM PROGRAMA EXEMPLO • 

20 HOME 

30 INPUT "QUAL E SEU NOME" ; N* 

40 PRINT N* 

60 PRINT "ESTE E COMPUTADOR TK-2000 COLOR" 

70 END 

Como podemos ver, tanto o conteudo da linha 50 como 
f,i propria nCimero da linha -foram supri midos. 

Voce deve usar o comando DEL para suprimir urn con junto 
ili> linhas. A -Figura abaixo indica um e;;emplo deste 
pr ocedi men to : 



~^ 



'ii 



>DEL 20,60 

>LIST 

10 REM PROGRAMA EXEMPLO 

70 END 



13 . V 1 . 5 

comando DEL 20,60 suprimiu todas as linhas de progra- 

jj entre as linhas 20 e 60 (inclusive). Mesmo que a linha 

em si nSo existisse todas as linhas com numera^So entre 



ri ■ 60 seriam suprimidas. 



VI. 2. 2. Permutando Caracteres 

A permuta de caracteres de uma linha e hastante 
ml triples. Basta movimentar o cursor, atraves das teclas 
Iflltquftdas ( j^ ^ ♦-* >j para a parte que se deseja alterar e 
iliyitar os novos caracteres sobre os antigos. Por exemplo, 
mm na linha: 

100 PRINT" QUANT I DADE REAL" 
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desejarmos trocar REAL por ESTIMADA., basta posi cionar a 
cursor sobre a letra R e digitarmos ESTIMADA". A linha 
passara entSo a forma ! 

100 PRINT "GUANTIDADE ESTIMADA" 

Pa.ra. se efetivar a alteracSo devemos pressionar a tecla 
RETURN. 



VI. 2. 3. Supressa"o de Caracteres 

Pode-se suprimir caracteres, individualmertte, 
digitando— se urn espaco tim branco sobre eles. Note que no 
BASIC os espa?os brancos a ma:is s^o ignorados, a ti'jia ser que 
sejam inseridos entre aspas. 
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FA£A SEU RE5UM0 
I. A i n struma FOR.... NEXT tern por -final idade basica 

um determinado namero de vezes as instru^fles que se 

wncontram entre as ordens . . e 

9t a formato da ordem FOR e 

• n:iR>< -..-...... >< ><.„....-...- - > 

. , ><..„..—.„■..—.,„.,.-..„.> 

a da ordem NEXT £ 

«NEXT> < -. . .- > 

'. Varias instra^Bes separadas por (....) 

pudem ser reunidas numa uni ca linha, sendo que a ordem de 
i' ■(■[ ut, So destas serS da para a 

1. F'ode-se usar tambem a instruct FDR NEXT como um 

-....,. dentro de um programs. Para tanto a ordem 

deve Esta logo em seguida a , sem que haja 

nwnhuma instru^Ko entre el as. 

S, Quando se-usa a in struma FOR NEXT como 

pode— se variar a intervalo determinado 

All I erando-se a contagem desta instrut^So, ou seja, quanto 
BUtDf a di-ferent^a entre os valores e da 

v>*r i avel de-finidas na ordem FDR, maior o tempo e quanto 
ffl»nor esta diferenca menor o tempo. 

ii Para que a linha em que se encontra o cursor seja ignora- 
i liD, deve-se manter a tec-la ........ pressionada & digitar 

Hnt&a a tecla . . „ ........ . 

/. comando permite suprimir um con junto de li- 

iilhui:.) do programa, seu formato e: 

'■■■/ A V.'' V-'" &''■■ 

tnuli',1 A e B correepondem respect ivamente aos numeros da 
e linhas a ser em supr imidas. 

Hi Para trocar um caracter de Lima linha de programa, basta 

pimt t::i onar o no local ocupado por este e ......... 

ii rtova caractm~ . 

'/. A supressa'o de um caracter e -feita digitando-se um 
.......... sobre este. 

11/1. Normal mente o passo da instrucSo FOR, ..... NEXT e 

1 ml ft passo pode ser alterado atravfes da ordem ...... junta a 

I UP. 

PI MPOSTAS: 

1, rep>etir, FOR, NEXT; 2. name-de-vari avel -real , = , valor 
1 ni rial da variavel, TD, valor -final da variavel real, nome 
■ l.i variavel real; 3. dois pantos (:), esquerda, direita? 4. 
I ft flip a de espera, NEXT, FDR; 5. tempo de espera, -final, ini- 
SiAlJ 6. CONTROL, X; 7. DEL, DEL, , , primeira, ultima; S. 
i i.if » or, digitar; 9. espat^o em branco; 10. 1,STEP. 



CAPITULD VII- 6RUP0S DE INSTRUpOES E COMANDOS 

Temos usado no decorrer deste livro, as nomes, instru- 
(;ftes e comandos, aparentemente sem distinca"o. Na realidade, 
raxiste Lima di-feren^a s&ti 1 entre estes dais termos. Enquanto 
OS comandos dizem diretamente ao computador o que -faser, as 
). nstruf 5es aparecem como parte de urn programa. Por e>!emplo, 
RUN e LIST s5o comandos, poi s indicam diretamente para o 
i;omputador inici ar a eKecucSo do programa e apresentar as 
linhas de programa^So respecti vamente; n^to -fan sent i do uti- 
lizer estes comandos dentro de urn programa (embora possam 
lir usados) ■ INPUT e um.tipico caso de instrucao, pois deve 
Kter usada necessariamente dentro de urn programa. Estes dois 
t ormos passam a se con-fundir, por exemplo, em HOME, que pode 
t usnto ser usado indi vi dualmente como urn camando ou dentro de 
um programa,, como uma instru£a*o. A di f erenci ac^Ko entre cd- 
mdndos e instru^cfes e apenas conceitual, sendo que na prati- 
es n&o tem maior releva-ncia. 

Neste capltulo, as novas instru^des e comandos sKa 
.sipresentados dentro de grupos, de acordo com a final idade a 
que? se destinam. Ap6s sua leitura, voce passara a estar a 
p#r da fnaioria das instru^Oes basicas do BASIC, e ja tera 
r BC ur sos razoaveis para comecar a desenvolver sens proprios 
\>r ngranias. 



VII. 1. OPERACAO COM CADE t AS 

Esta sefa"o tern por -finalidade permitir que voce 
in.inipule cadeias, dividindo— as em partes, contando a nCtmera 
ilt» caracteres que elas possuem etc... 



VII. 1.1. LEN 

Esta instru^So -fas com que o computador conte o n&mero 
ilw caracteres de uma cadeia. El a pode ser usada em dois 
tippffl de formato, conforme se ve a seguir: 

<LEN> <(> <cadeia> <)> 

ou 
<LEN> <(> <nome-de-variavel tipo cadeia)- <)> 

Por es-iemplo, digite as linhas: 

>PRINT LEN ("ANTENA") 

ou 

>A* = "ANTENA" 

>PRINT LEN <A*> 

Como se pode ver, nas duas formas o result ado foi o 
fiiwumo, ou seja, a apresentapSto do ndmero 6 na tela, uma vez 
ijuw ANTENA possui 6 caracteres. 
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Entre agora com o seguinte programa no sen computadaril 

>NEW 

M0 REM C0NTA6EM DE CARACTERES 

>20 HOME 

>30 INPUT "QUAL A PALAVRA ?"; X* 

>40 N m LEN (X*) 

>50 PRINT "0 NUMERO DE LETRAS E ";N 

>60 PRINT 

>70 GOTO 30 

>RUN 

Note que neste ewemplo, o nflmero de caracteres da 
cadeia foi atribuldo ao nome-de-vari avel real N. A -figura 
VII. 1 apresenta urn posslvel resultado da execufKo deste 
programa. 



I 



DUAL A PALAVRA ? HQJE 
D NUMERO DE LETRAS E 4 

QUAL A PALAVRA ? CARAMBOLA 
NUMERO DE LETRAS E 9 

QUAL A PALAVRA 7 | 



Fig. VII. 1. 

Para i nterromper o programa pressione CONTROL C on RESET, 

VII. 1.2. LEFT* 

Esta instrucSro tem por ■funca'o selecionar caracteres de 
uma cadeia, a partir da esquerda. Execute o seguinte 
e;<emplo; 

>A* = "COMO VAI VOCE" 
>PRINT LEFT* (A*, 4) 

Como resultado teremos os quatro primeiros caracteres 
d& cadeia apresentados na tela, ou seja, a pal avra COMO. 

Vamos rodar agora o programa a seguir: 



>NEW 

>5 HOME 

>10 A* = "COMO VAI ?" 

>20 FOR I = 1 TO LEN (A*) 

>30 PRINT LEFT* (A*, I) 

>40 NEXT I 

>50 END 

>RUN 
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Surge entKo uma tela, con-forme indica a -figura seguintf 



1 



C 

CO 

COM 

COMO 

COMO 

COMO V 

COMO VA 

COMO VAI 

COMO VAI 

COMO VAI ? 



Ilg. VII. 2. 

-f lu:<ograma do programa e (-fig. VI 1 1 . 3) 

HOME (limpa a tela e posiciona o cursor em sgu inicio) 

A* *» "COMO VAI ?" (associa ao nome-de-variavel A* a cadeia 

"COMO VAI") 



1 



I UN 1 = 1 TO LEN (A*) (define a instruct) FOR... NEXT cam a 

valor inicial da variSvel 1=1 e o 
valor -final igual ao numero de carac- 
teres da cadeia. Uma vez que neste 
particular caso a cadeia tern 10 cara- 
cteres, esta instruc&o corresponded a 
a FOR I ■ 1 TD 10) . 



I 'HI NT 

I 
ni x r 



LEFT* (A*, I) (apresenta as I primeiros caracteres da 
cadeia > 

I (soma 1 a variavel I e desvia o programa para a 
ordem FOR ate que I atinja sen valor final - no 
caso 10) . 



) 



I N 

I tg 



(f inaliza o programa) 
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E importante voc& notar que, para o computador, o 
V«pa£Q em branco tambem e processado como qual quer outro 
(utracter, portanto quando a instru^o LEN (A*) -foi 
Utilizada, ela contou 10 (incluindo os dois espacos em 
he danco) . 



VII. 1.3. RIGHT* 

A instru£a*o RIGHT* opera de -forma semelhante a 
*nt wrier, pqr&m neste caso a sele^^o de caracteres e -feita 
. <ii ordem inversa, ou seja, da direita para a esquerda. For 
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exempl ol 

>A* ■ "COMO VAI VOCE" 

>PRIIMT RIGHT* (A*, 4) 

Neste caso teremos entSo a paravra VOCE apresentada n< 
video. Execute agora o programa : 

>NEW 

>5 HOME 

M0 A* = "COMO VAI ?" 

>20 FOR I = 1 TO LEN (A*) 

>30 PRINT RIGHT* (A*,!) 

>40 NEXT I 

>50 END 

>RUN 

A tela apresentara entSo (-f i g. VI 1 1 . 4) 



V 





7 


I ? 


AI ? 


VAI ? 


VAI ? 


D VAI ? 


MD VAI ? 


DMO VAI ? 


COMO VAI ? 



Fig. VII. 4. 

-f luxograma deste programa e identico ao apresentada 
na secefo anterior, exceto que ne. instruslSo FRIMT 
RIGHT* (A*, I) passam a ser apresentados os I ultimas 
caracteres da cadeia. 



VII. 1.4. MID* 

MID* permite selecionar caracteres intermedi ari os de 
uma cadeia. For exemplo, a instrucSso MID* (A*, 3,5) faz com 
que sejam sel eci onados, a partir do terceiro caracter da 
cadeia A*, cinco caracteres. Digite agora. 

>PRINT MID* ("COMO", 2, 2) ■' 

SerSo apresentados ent«=fo os caracteres OM, ou seja, os 
dois caracteres a partir do 2 da cadeia. Entre com o 
programa a seguir: 

>NEW 

>5 HOME 

>10 A* = "COMO VAI ?" 



80 



>20 FOR I - 1 TO LEN (A*)- I 
>30 PRINT MID* (A*, 6, I) 
>40 NEXT I 
>50 END 
>RUN 

Iitmos enta'o na tela (-fig. VII . 5) 



V 
VA 

VAI 
VAI 
VAI 



Pi V. VII.5 



Note que na instrue&o FOR 1 = 1 TO LEN(A*>- 5, -foi 
lUt)tr«ldO 5„ uma vez que s6 existem 5 caracteres a serem 
«|ir mwitados. Desta forma, neste caso esta instruf^D -fica 
*i<|ul v«.*,t emte a : 

FOR I = 1 TO 10-5 

au 

FOR I = 1 TO 5 

P«r* con-firmar sua boa campreens^o a respeito das 
I iiml rUfcftlfcf tratadas neste Item, digite o programa abaixo e, 
wmiii olhar a figura que segue a listagem do programa procure 
fir mvmr os resultadas na tela. 



>NEW 



HOME 



> 1 


A* = "SEU CDMQDO" 


>20 


PRINT 


A* 


>30 


PRINT 


LEN (A*) 


>40 


PRINT 


LEFT* (A*, 2) 


>50 


PRINT 


RIGHT* (A*, 3) 


>60 


PRINT 


MID* <A*,2,<b> 


>70 


END 





JA -fes sua previsKo ? Ent&o digite o comando RUN e 
i mil Ira seus resultados que devem estar de acordo com a 
I i Hi ii ,\ abaixo : 



My- VII, 6. 



SEU COMODO 

10 

SE 

0D0 

EU COM 



^ 



V 
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VI 1. 2. OPERACSO COM DADOS NUMERICOS 

As operapfles com dados nutnfericDS serSo apresentadas de 
forma oiais ampla em capitulos pasteriores. Par hora, daremos 
apenas uma introduc&o neste assunto atraves dos comandos RND 
e INT. 



VI I. 2.1. RND 

name desta instruc^D corresponde a abreviatura de 
randomico. Uma seri e de n&iiieros randtimicos sAgr»i#Ieit numeros 
sern qualquer r&l ac iff entire si, aleatorios. on que t\M& exist© 
funi^o que? possa representA-Ios. Se vace naa tern forma^Sn 
mat emetic a, pode Ihe ser di-ficil entender este conceito, mas 
o que import a e observar sua ac^io e saber que, em 
determinadas areas <por exemplo, joyos) e uma instrucao 
G5per:i almente fittil. 

No TK~ 20,00 COLOR , RND S I ) -fas com que sejam selecionados 
numeros random! cos entre e 1 <0 < n < 1). Digite a 
exemplo: 

>NEW 

>5 HOME 

>10 FOR I = i TO $M 

>20 PRINT RND CI) . 

>30 NEXT I 

A prime! ra ves que voc& rodar este prograota, o i'K-2000 
COLDR apresentara os resultados indicados a seguir. Note 
entretanto que. cada vez que o programa far novamente 
rodado, os resultados serto di 4 erentes, par em sempre; com 
numeros entre e 1 .. 

>RUM 

,.270011996 . 139756248 

.690102028 .141352116 

.152267027 .690658204 

. 3 6 08 8 9 7 3 2 . 6 282 62312 

. 58 1 1 2 1 379 . 768268873 

Se voce dose jar sequ^ncias de dez numeros entre e 1% - 
bast a dig! tar: 

>NEW 

>5 HOME 

>10 FOR I = 1 TO 10 

>20 PRINT 10 * RND(1> , 

>30 NEXT I 

A primeira vez que este programa -far exeeutado, os 
riss.ul tados serSo : 
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>RUN 

2.70011996 1.39756248 

6.90102029 1.41352116 

1 . 52267027 6 . 90658204 

3.608B9731 6.28262312 
S. 81 121379 7.68268873 

Rode este programa mais algumas vezes e observe que os 

nov.Offl resultados di fi ci 1 mente serSo repetidos. 



vll.2.2. INT 

A instruccfo INT faz com que a parte -fracionaria de urn 
nomoro real seja desprezada. Par ewemplol 

>PRINT I NT (1.896) 
>PRINT INT (2- 571) 
>PRINT INT (0.62528) 

0<5 co/nandos acima terao resiultados 12 e 
t emp&eti vamente, 

K bast ante frequente a necessidade de se gerar numeros 
t -tnrlOmieos inteiros e para tanto utiiizamos as instrucbes 
I N I ffi RIMJ3 em con junto. Suponha que se deseja fazer am 
ij nqr ama para a selefSo de cinco narneros (entre e 99) de 
nm i urt&Q da Loto. 

>NEW 

>S HOME 

>10 PRINT "OS NUMEROS SELECIONADOS SAO: ": PRINT 

>20 FOR I = 1 TO 5 

>30 PRINT INTC 100 * RND(1>), 

>40 NEXT I 

III ■( '/a{,"S)G5l 1. Apos digitar o programa, o primeiro con-junto 

de resutadoB (quando vocrfe radar pel a primeira 
vez o programa) , sera sempre igual „ bent coma a 
segunda, terceiro. quarto, etc, ., porem o 
primeiro conjunto sefri di-ferente do segundo 
por sua vez diferente do terceiro, do quarto, 
etc. Assim, se apos rodar varias vezes o pro- 
grama voce apaga-lo desligando o TK-2000 CO- 
LOR, e em seguida recarrega-la, as sequericias 
de con juntos de resultados seri-lo iguais a 
anteri or . 

2. Se voci* nSo entendeu por que RWD ( 1 ) -foi 
multiplicado por- J.00 basta verificar exemplos 
extremDB- 

a) RND ( 1 ) = . 00 1 25 «>°*q°°'« +~ 0. 12625 wrl0 '" Ba ' ■»» 

b) RND<1>= 0.9997B IOO * Q ' 9 *"'* ^99.976 ,HTt **< m1 *-99 
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Para gerar 10 nftmeros inteiros entre 1 e 10 podemos 
usar o seguinte programs. 

>NEW 

>10 FOR I = 1 TO 10 

>20 PRINT INT i 10 * RND(D) + 1, 

>30 NEXT I 

Procure agora desenvolver seus proprios programas 
utilizando as instruc&es RND e INT. Por exemplo, gere 
conjuntos de numeros dentre de di versos limites- 



VI I. 3. COMANDQS RELACIONADOS A EXECU^AO DE PRQBRAMAS 






Em capitulos anter lores ja apresentamos alguns comandos 
relaciorrados a este grupo, que foram : LOAD, NEW, CONTROL C, 
RUN e END. Neste capitulo vamos recordar as instrucdes LOAD 
e CONTROL C, e analisar as novas instruc&es deste grupo. 

VII. 3. 1. LOAD e SAVE 

Est as duas insiruc&es sa"a usadas somente quando o TK- 
2000 COLOR esta equipado com gravador cassete. Na realidade 
elas s&o divididas em: 

a) LOADT "nome-do-programa" : c&rreqa urn programa cujo 
nome < que e opcional, neste caso) esta entre aspas 
do cassete para o TK-2000 COLOR. 

b) LOADA : carreqa programa de -fita cassete no formato 
Apple II, no TK-2000 COLOR. 

c) SAVET ,1 nome-do-programa" : grava o programa cujo nome 
(opcional) esta entre aspas do TK-2000 COLOR para a 

■fita. 

d) SAVEA : grava programas e dados em fitas no -formato 
Apple 1 1 . 

Se vnc£ ja esta com o seu gravador conectado ao TK-2000 
COLOR, devidamente regulado (con-forme descrito na secKo 
11,5) e possui uma -fita virgem <ou qualquer outra cujo 
conteudo na*o Ihe seja important©), execute a /seguinte opera- 

cSo. ^ 

1. Se a -fita n&o -for virgem, limpe-a, gravando-a em 
branco (com a entrada de gravaca"o desconectada- na*o 
esquecenda de reconectar a entrada no final desta 
operate) . 

2. Rebobine a -fita e ligue o gravador em RECORD 
(gravar ) 



3. Escreva algum programa no TK-2000 COLOR e verifique 
se ele esta em ordem. Par exemplo: 

>N£W 

>1& HOME 

>20 FOR I = 1 TO 5 

>Z0 PRINT "TE5TAND0" 

>40 NEXT I 

>RUN 

Note que este programa deve apresentar a palavra 
"testando" no inicio das cinco primeiras linhas do 
video. 

4- Pense num nome com ate 6 caracteres para este 
programa, como por e;templo "TANDO" 

5- Digite entSo 

>SAVET "TANDO" 

e aguardando alguns instantes, ate o gravador 
cessar suas atividades. 

6. Digite : 

>NEW 

Agora se voce tentar rodar novamente o programa 
(atraves de RUN), n&o haverSo resultado algum, Lima vez 
que o programa -foi apagada da memoria do TK-2000 COLOR. 

7. Rebobine a fita e aciane o gravador em PLAY 
B. Digite: 

>LOADT "TANDO" 

e aguarde a atividade do gravador cessar. 

9. Agora, digitando o comando RUN, veri-fique como o 
programa roda, uma vez que -foi recarregado na 
mem6ria do gravador. 

tlhmitfK'vacSo: o programa TANDO esta gravado permanentemente na 
•fita cassete, ou seja, mesmo ap6s desligarmos o 
si sterna (computador e gravador), sempre que 
desej ar mos, poderemos carrega-lo no TK-2000 
COLOR atraves do comando LOADT "TANDO", a nSa 
ser que a area da fita cassete onde ele se 
encontra gravado seja alterada. 
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VI I. 3. 2. STOP e CONT 

Tanto a instru^Ko STOP como END inter rompem a e>jecu^a'o 
de um programa. A di-ferenfja entre estas duas e que varias 
instru^ftes STOP padem ser usadas durante um programa enquan- 
to a instru£a"a END deve ser usada apenas para -finalizar o 
programa. Quando o computador executa um STOP, ele apresenta 
a mensagemU 

BREAK EM >!W 

onde x:< representa o numero que indica a linha de programa 
em que o processamento -foi i rtterrompi do. Exemplal 

>NEW 

>10 FOR I = 1 TO 10 

>20 PRINT I; 

>30 NEXT I 

>40 STOP 

>RUN 

sera apresentando entSo : 

1234567B910 

BREAK EM 40 
>■ 

Quando o programa e interrompido com STOP, pode-se dar 
prossegui mento a sua execu^o atraves do comando CONT. 
Exempl al 

>NEW 

>10 FOR I = 1 TO 2 

>20 PRINT U 

>30 NEXT I 

>40 STOP 

>50 FOR I = 1 TO 5 

>60 PRINT I| 

>70 NEXT I 

Ao se digitar RUN tersmos entStoI 

>RUN 

12 

BREAK EM 40 

iW 

Digitando— se entSo CONT, o programa passa a essecutar as 
linhas 50 a 70. 

>CQNT 
12345 

Note nos exemplos abaixo, que a instru^So END pade ser 
usada de -forma semelhante a STOP, porem neste caso nenhuma 
mensagent e apresentada. 
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Exemplo A 

>NEW 

>10 FOR 1 = 1 TO 10 

>20 PRINT II 

>30 NEXT I 

>40 END 

>RUN 

Resul tado 

123345678910 



Exemplo B 

>NEW 

>10 FOR I = 1 TO 2 

>20 PRINT I; 

>30 NEXT I 

>40 END 

>50 FOR I = 1 TD 5 

>60 PRINT 1 9 

>70 NEXT I 

>RUN 



Resul tado: 



Di gitando-se entSo CONT teremos: 

>CONT 
12345 
I 

Como se pode natar, o camando CONT tamb§m pode ser 
m>ado quando o programa & interrompi do pela intruc&o END. 



VI I. 3. 3. CONTROL C e RESET 

A ■funca'Q que se obt£m mantendo— se a tecla CONTROL 
pressiDnada e digitando-se em seguida a tecla C e id^ntica a 
t\,\ instrucSo STOP, ou seja, a interrupcSo do programa segui- 
iU pela apresentacSo da linha na qual este foi i nterrompi do. 
I ntretanto, CONTROL C e acionado pelo operador em qualquer 
jionto do programs. E::emplo: 

>10 PRINT "BOM DIA" 

>20 GOTO 10 

>RUN 

Apos termos entrado com o programa aclma, no momenta em 
ijiu? quisermos interrompe-1 o bastara manter CONTROL abaixada 
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e digitar C, quando ent&o teremos uma tela do tipo da -figura 
VII. 7 




Fig. VII. 7 



DIA 

DIA 
BOM DIA 
BOM DIA 
BREAK EM 10 



Apos terraos i nterrompi do o programa atraves da comando 
mencionado, poderemoe dar novamente prosseguimento a el e 
acionando o cornando CONT. 

pressionamento da tecla RESET -faz com que o TK-2000 
COLOR execute fun^cta semelhante a CONTROL C, porem sem 
apresentar a linha na qual o programa foi i nterrompi do, e 
n3o aceita o comando CONT. 

VI I. 3. 4- TRACE e NOTRACE 

Se voce" quiser seguir o processo de execuccfo de urn pro- 
grama, podera usar TRACE. Antes de comecar o programa, 
pressione TRACE e RETURN. Consequentemente, quando o progra- 
ma estiver rodando, o computador apresentara o nftmero de 
cada linha conforme el a esteja sendo executada. Siga o 
e>:empla: 

>NEW 

>10 FOR I - 1 TO 2 

>20 PRINT El 

>30 NEXT I 

>TRACE 

>RUN 

•SB #20 1*30 #20 2#30 

A -figura a seguir indica o signi-ficada do resultado 
deste programa. 



#10 
4 




#2 

A 




k 


ej-iecut^Sto 
da 1 i nha 
10 
















executja'o 
da linha 
20 



Fig. VII. 8. 



1 

A 



#30 



resul tado. 


da 


es<ecuc3o 


da 


linha 20 



execuca"a 
da 1 i nha 
30 



#20 

A 



nova 


bxb- 


CUf So 


da 


1 i nha 


20 





#30 

4- 


da 


ecuccta 
1 inha 
30 



resultado da, 
nova exe™ 
cucSo da linha 
20 



A principal funfKo do TRACE £ auxiliar o programador a 
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Mi'ui nhrir erros durante a elaboracSo de urn programa. 

Q unico comandD que desativa o modo TRACE e NQTRACE. 
Mn I , in to note que Lima vez que TRACE esteja acionado, NEW ou 
M 'II I nSo cessarcto sua atividade. 

VI I. 3. 5. PDKE e PEEK 

A utilizaca'o destas duas f uncfles, requer uma certa 
KMfiwr iencia em programacSo. Vamos -fornecer aqui suas 
hinvfles, porem se voce na"o tem uma certa pratica e algum 
i iihhfcxr. imento do hardware do microcomputador na"o e necessario 
i|!ir.' «@ detenha muito nest a se^eio. 

POKE serve para introduzir dados diretamente na memo- 
i i.i do computador, lembre-se que os dados so podera'o ser 
I lit n.idusidos nas memorias RAM, uma vez que o conteudo das 
nii'iiinr i as RDM e inalteravel. Para se executar esta introduc&a 
t li.-vi.A se indicar duas coisas: 

1. dado a ser introduzido 

2. D endereco da memoria RAM para o qual se deseja 
envi ar o dade desejado. 

E>: emp 1 o : 
>NEW 

>POKE 1500 , 56 

t ^ 

endereco dado 
(decimal) (decimal) 

POKE 1500,56 indi ca a introduc&o do valor 56 no endere- 
tn IS00. Aqui „ para facilitar a nossa apresentatcto, 56 e 
\"it!\0 kSo numeros decimals os quais serSo trans-f ormados em 
liin&rios no computador para serem armazenados. 

Os dados no microprocessador ska armazenados em bytes 
Ml hits), assim sendo a dado a ser introduzido diretamente 
n,i inemoria deve estar compreendido entre e 255- Se -for 
i t-iil, ida a introduccto de urn numero -for a destes li mites, o 
i imiputador apresentara a mensagem: 

7VAL0R I LEGAL #ERRO 

Esta mesma mensagem serS tambem apresentada se o ende- 
i »ti,i) iar maior que 65.535, uma vez que este & o maior ende- 
i «v<> da memoria RAM do TK-2000 COLOR. 

Desejando-se ter acesso direto a urn dado de urn determi- 
ii.iifo endereco da memoria RAM dD TK-2000 COLOR, usa-se a 
hmlruca'o PEEK juntamente com o endereco desejado. Por exemplo 

>10 A = PEEK (120) 
>20 PRINT A 
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Ad se executar o programa acima, o conteudo do endere^o 
120 £ apresentado na tela. Note que, se voc£ executou o 
e^emplo apresentado no inlcio desta se^o (POKE 1500, 56), 
ao digitar: 

>10 A = PEEK (1500) 

>20 PRINT A 

>RUN 

Surgi ra na tela o numero 56, que foi justamente o 
conteudo introduzido no endereco 1500 atraves da instruca'o 
POKE . 



VII. 4. INSTRUgOES RELATIVAS A EDIfAO E FDRMATA^AO 

Este grupo de instru^aes se refers a apresenta^So de 
determinados dados ou instru^oes de programas, bem corno a 
forma em que estes b&o apresentados, Algumas das i nstrucdes 
deste grupo ja foram descritas 
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LIST, DEL, REM, HOME e NEW 



VI I. 4.1 TAB 

A instruca'o TAB e usada para deslocar o cursor 
horizontalmente. Este ' comando pade ser utilizado para 
inici&r a impress&o de dados a partir de uma col una 
qualquer. TAB e normalmente associado a PRINT. 

No exemplo abaixo as nflmeros 5 e 7 ser»(o apresentados 
na 10 e 15 col una respecti vamente. 

>PRINT TAB (10) J 5? TAB (15); 7 



VI 1.4. 2. VTAB e HTAB 

Atraves de VTAB pode-se mover o cursor para qualquer 
linha do video. Este movimento e sempre executado no sentido 
vertical, para balxo ou para cima, sendo que a posi^cfo % 
dada relati vamente ao limite superior da tela (linha 1) 
dentro dos limites 1 a 24. Qualquer valor fora dos limites 
citados fas com que a TK-2000 COLOR emita a mensagem de err a: 

?VAL0R I LEGAL #ERR0 

A instruca'o HTAB e usada de forma semelhante a VTAB, 
porem move o cursor no sentido horizontal. Neste caso entre- 
tanto, os limites utilizados va"o de 1 a 255, rel ati vamente 
margem esquerda da tela. Uma vez que a tela s6 possui 40 
posicdes horizontals, os numeros 41 a B0 passa a posicionar 
o cursor na linha seguinte e assim por diante. 
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Confi ra no 



exemplo a seguir as -funfdes desta 



>NEW 

>10 HOME 

>20 VTAB 12 

>30 HTAB 18 

>50 PRINT "TK-2000 COLOR" 

>6>0 END 

Coma vac& deve ter concl ut do, o nome TK--2000 COLOR -foi 
»n|ii i/'itientado a partir da linha 1.2, coluna IS do video. 



VII. 4. 3. SPC 

SPC § a abreviafSo de espa^o. SPC < 20) indica que o 
I iir'Miir ' deve ser movido 20 espa^os horizontal mente- Varnos 

p| ifvar no prdximo exemplo a di-feren^a en ire as e-feitos das 

Iflitr ufSes BPC e TAB. 

:>new 

>10 print "aaaa"; tab (15); "bb" 

>20 print "cccc"; spc (15); "dd" 

An executarmos este programs aparecerA na tela alqo 
■..■(hgJ. hante a prow i ma -figura. 



>10 PRINT "AAAA"; TAB(15); "BB" 

>20 PRINT "CCCC"; SPC (15); "DD" 

>RUN 

AAAA BB 

CCCC DD 



I ii| VI I I. 9 

Con-forme se pode observer, d primeira B se encontra na 

IV. coluna, contada a partir do inieio da tela enquanta o 

pi 1 J meiro D e apresentado 15 posi^o'es apfts o ultimo C. 



VII. 4. 4. POS 



POS 1 a abreviaijra'o de posica'o. Esta instru^So apresenta 
I ultima posi^So ocupada pelo cursor em uma linha. 
Urn ma Iniente, deve-se apresentar parent eses apos POS, sen do 
qUtt o ntimero entre parenteses n&o -fa: di I erenfa, por 
• vipmplo, POS (0) e POS (15) tern o mesmo significado. 

Observe o exemplo abaixo para entender melhor a ■funfa'o 
Hwste comando. 



>NEW 








>10 PRINT 


"AAA"; PDS (0) 






>20 PRINT 


"BBBB"; POS (12) 






>30 PRINT 


"AAA"; TAB (10); 


"BBBB"; 


POS(0) 


>40 PRINT 


"CCC"|i SPC U0)j 


"DDDD" 


( POS ( > 


>50 PRINT 


TAB (23) 3 POS (0) 






>60 PRINT 


SPC (23); POS (0) 







Apds digitarmos RUN, teremos: 



>RUN 




AAA3 




BBBB4 




AAA 


BBBB13 


CCC 


DDDD17 



Observances: 

1. Nas linhas .10 e 20 a instru^So POS -fas com que seja 
indicado exatamente o nQmero de caracteres da 
linha, uma vez que a apresenta^So destes come^a no 
Inicia da linha, e que n&o ha espafos entre eles. 

2.. Se voc§ nSo entendeu o resultado da execu^&a das 
linhas 30 e 40, recapitule as secftes 'VII,, 4.1. e 
VII. 4.3. (instrucaes TAB e SPC respecti vamente) 

3. Atraves dos resultados da execufSo das linhas 50 e 
60, pode-se concluir que nSo e necessaria que seja 
apresentado qualquer caracter na tela para que a 
ultima posic^o ocupada pelo cursor, em determi nada 
linha seja diferente de zero. 

i 
VII. 4^5. CLEAR 

comando CLEAR permits que se "limpem" da memoria 
todas as variaveis ex i stent es. Per exemplo, execute as 
seguintes linhas: 

>A = 7 
>PRINT A 

Coma resultado teremos a namero 7 apresentado na tela. 
Agora fa^a : 

>CLEAR 
>PRINT A 

Con-forme se p.ode observar, ao inves de 7 passa a ser 
apresentado (0 e apresentado sempre que no comando PRINT 
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ii.iu ha nenhum valor atribuido ao nome-de-vari avel utilizado) 



VII. 4. 6. FRE<0) 

Este comanda in-forma a area ou a quantidade de memoria 
UAM ja ocupada pel a BASIC. Ele deve ser usado juntamente 
turn PRINT sendo que o resultado sempre sera negativo quando 
A w&a. ocupada for menor que 32767. Seu -formato e: 

>FRINT FRE<0> 



Para se ter o tamanho real da memoria disponivel 
b*»t#rS somar 65536 ao numero gerado pela instruc&o acima. 



VI 1.4. 7. INVERSE E NORMAL 

Ao usar a comando INVERSE as caracteres aparecertio no 
video em preto sobre -fundo branca. comando NORMAL volta a 
tmltuaca'a original, de caracteres em branca sobre -fundD 



VI I. 4. 8. SPEED 

F'odemos determinar a velocidade com que os caracteres 
»(Mn apresentados na tela. Quando SPEED= 0, e a velocidade 
ffhwis baixa, e quando SPEED m 255, a velocidade mais alta. 
Lima tentativa de usar urn numero maior que 255 resulta na 
mien sag em de erro: 

7VAL0R ILEGAL #ERRO 

Esta di-feren^a de velocidade pode ser -facilmente notada 
ttriMttn do exemplo a seguir: 

>NEW 

>10 SPEED = 1 

>20 FOR 1=1 TO 100 

>30 PRINT I; " "J 

>40 NEXT I 

>50 SPEED = 255 

>60 FOR I = 101 TO 200 

>70 PRINT I; " w i 

>B0 NEXT I 

>RUN 

Observe a di-feren^a de tempo entre a contagem de I a 
100 e de 101 a 200. 
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VII. 4.9. CONTROL X 

Mantendo-se a tec la CONTROL abaixada e pressianandn «w 

em segi-uda a tecla X, Lima sinal de barra (\) sera col QCftdQ 

na linha em que se encontra o cursor, fazendo com que eat* 

linha seja ignorada pelo computador. For exemplo : 

>NEW 

>10 PRINT "BARRA" 

Agora pressi onando a tecla CONTROL em con junto com X, 1 
linha acima ficarS de -forma: 

>1& PRINT "BARRA" V 

Pode-se entao digitar RUN e observar que est a linha -foi 
anulada nao tern qual quer e-feito. 
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FACA SEU RESUMO 

1 . Para que o computador apresente o n&mero de caracteres de 
Lima cadeia devemos digitar: 

< PR I NT >< X . . >< " cadeia " X . . . > 

ou entSo associarmos a cadeia a um nome-de-variavel e 

efetuar a comando: 

<PRINT> <..«... X Xnome-de-variavel tipo cadeia> <....> 

2. comando: 

<PRINT> < . , > < <> < > < > < > <) > 

■fas com que os I primeiros caracteres da cadeia associada. a 

variavel A* sejam apresentados na tela. 

3„ Desejando-se que sejam apresentados na tela os I tiltimos 
caracteres da cadeia associada a variavel A* utiliza-se! 
<PRINT> < > <(> < ....> < ..> < > <)> 

4. Se o nome-de— variavel A* -for associada a palavra 
BORBOLETA <A* = "BORBOLETA" > , para que o TK-2000 COLOR 
apresente a cadeia "0LE"„ atraves de um unico comando que 
utilise A* deve-se digitar: 

PRINT <A* , ) 

5. Para se obter uma serie de nCinteros randflmieos entre & e 1 
pode-se usar a instructor 

< > < . . > < 1 > < > 



6. resultado apresentada pelo comando: 
< PR I NT > < I NT > < ( > < n umer a real > < ) > 
sera a parte do nftmero real 

7, Os comandos usados para carga de pragramas do tipo TK- 
2000 COLOR e Apple-Il s&a respect i vamente: 

"nome de ar qui vo" 

e 



8. A instrucSo ........... f az com que a eviecuca'o de um 

programa se j a interrompida e o n&mero da linha em que houve 
est a interrup^&o apresentada no video. Para que o programa 
tenha prossegui mento deve-se usar o comando 

9. operador pode interromper a eitecufJio de um programa, 
fazendo com que se j a apresentada a linha em que este -foi 
i nterrompi do, mantendo pressionada a tecla ...... e 

digitando a tecla Se -for desejado simplesmente que q 

programa seja interrompido, sem que a linha em que -foi -feita 
a interrupeao seja apresentada, basta digitar a tecla 

10. comando , permite que o processo de execucSo de 

um programa seja seguido pelo operador. Para se desati var 
este modo de operac&o deve-se usar o comando , 

II* Para se introduzir um dado numa posi^Sto da memfiria RAM 
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do computador usa-se o comando: 

< > <endere^o da mem&ria> < > <dado> 

De forma inversa, para se acessar um dado de uma determinada 

posifSo da memoria RAM utiliza-se: 

<......> < > <endere?o da <nem6ria> < > 



12. A instrucSa 



? <!.......> < n > < 



■■s. 



i* . . J 



faz com que o cursor se desloque para a n-esima coluna da 
tel a. 

13. Para mover o cursor para a linha n da tela podemos 

utilizar a instruc&o » De forma semelhante, para 

que o cursor seja levado para a posi^Sfo y a partir do inicio 
de uma linha utiliza-se a instru^SD ...... 

14. cursor se deslocara n espacos, a partir da ultima 
posip&o em que estiver, atraves da instruca"o: 

< > < (> < n > <) > 

15. A apresentaccfo da ultima posiea"a ocupada pelo cursor em 
uma linha £ obtida atraves da instructor 

< > < ( > < n > <) > 

onde n pode aer qualquer nrimero. 

16. Para se "limpar" as variaveis da memoria usa-se o 
comando < > 

17. Quando se quiser saber a quantidade de mern&ria livre do 
TK-2000 COLOR deve-se digitar: 

\ m m m m m * m ■ .♦" •.»■*«*■* .-"" \ \ .*•' \ m a m *. « * * H * & \ ) i? 

10* A velocidade de apresenta^ao dos carac teres na tela pode 
ser controlada atravfes da digitafSo de : 
-■ .'■ \ ....... ? < n > 

onde n varia de (menor velocidade) a 255 (maior 
velocidade) 

19. Para que a linha em que se encontra o cursor seja 
ignorada, deve-se manter a tecla pressionada e di- 
gitar a tecla 



respostas. 

l.LEN, t, LEN, ); 2. LEFT*, A*, , , I; 3. RIGHT*, A*, ft 

IS 4. MID*, 5,3; 5.. RND, <,); 6. inteira! 7 LOADT, LOADA, 

S. STOP, CONTS 9. CONTROL, E, RESET? 10. TRACE, MOTRACE! 11. 

POKE, |f PEEK, ( t )j 12. TAB, ( , ) ; 13. VTAB n, HTAB yj 14. 

SPC; 15. POSJ 16. CLEAR? 17. PRINT, FRE, 0; 18. SPEED, -, ? 

19. CONTROL, X 
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CAPITULO VIII- OFERACOES NO TK-2000 COLOR 

Em programas de computador, podemos usar variaveis para 
representar um enderefo de memoria. A -funcSo de cada 
variavel e semelhante a da memoria do computador. 

As variaveis podem ser divididas em vSrias categorias: 

1. Variaveis numericas como A S B,C7. 

2. Variaveis tipo cadeia coma A*, B* 

3. Variaveis tipo matriz (que serSo vistas adiante) , 
tais como A<10), A(3,5), A(4,5,B>, A*Q0,12> 

As operates de urn computador podem ser subdivididas em 
tr£s categorias: 

1. Operates Aritmeticas, tais como; +, -, *, /. 

2. Qperac&es Comparati vas, tais como: >, <, >=,,<=. 
.3. Operates Logicas, tais como: NOT, AND e OR. 

VIII. 1. OPERATES COM VARIAVEIS NOMERICAS 

No TK-2000 COLOR as variaveis numericas s£(o de duas 
categorias: 

Inteiras- devemos acrescentar o sinal "'/." apfls o none 
destas vari etveis. 

Nftmeros Reais- o TK-2000 COLOR assume urn nftmero real 

se a none da variavel na"o £ especi+i ca- 
mente assinalada. 



VIII. 1.1. Inteiros 

Cada valor inteiro (seguido por "/.) acupa dois bytes, 
isto e 16 bits. Os inteiros sSo limitados entre -32.767 e 
32.767. Se quisermos trocar um nfrmero real por urn inteiro, 
podemos especi-Fi car uma variavel intei ra do lado esquerdo de 
um sinal de igualdade. Execute o programa a seguir para que 
esta opera^So se torne mais clara. 

>NEW 

>10 FOR I = 1 TO 6 

>20 A = RND (1) #6+1 

>30 A7. = A 

>40 PRINT A, A*/. 

>50 NEXT I 



■ 
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Apos digitar RUN teremos um resultado do tipo : 

>RUN 

6.83882197 6 

1.61870576 1 

1 . 1 06289 1 

5.67606013 5 

4.31100663 4 

4.470451467 4 

Observas&o: Suanda utilizar inteiros, n3a use qual quer sinal 
para designar milhares, milhoes, etc.. 

Ex. 32.000 32,000 32000 



X 



C/- 



VIII. 1.2. Reals 



No TK-2000 COLOR, os li mites dos numeros reals s^o: 
1.70141183 E+3B, com o maxima de 9 algarismos. 

Para apresentar um namero real, se voc§ desejar deter- 
minar seu formato, devera observar as seguintes regras. 

a) Suponha que o numero considerada seja negativo; o 
sinal negativo serli sempre apresentado, antes do 
numero. Exemplo; 

>PRINT 132 * -12 

-1584 

b) Se o valor absoluto estiver entre e 999999999, 
ele serS apresentado sob a forma de um numero 
inteiro. Exemplo; 

>PRINT 111111111 # 9 
9999999999 



c) Quando o valor absoluto do numero e igual ou maior 
que 0.01 e menor que 99999999.2 , ele sera 
apresentado com ponto decimal -fixo e sem expoente. 
Exemplo: 

>PRINT 0.01 

.01 

>PRINT 999999999.199 

999999999 

d> Suponha que a limita^a'o do numero nSo esteja 
contida nos ftens bee, ele sera apresentado na 
nota£a*o cienti-fica. Exemplo: 
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>PRINT 1111111112 * 9 

1E+10 

>PRINT 999999999.21 

1E+09 

Se o nCimero real -for apresentado r\a nota^&o cientlfica, 
e necessario que depois do panto decimal haja urn nCimero sig- 
nificative <diferente de zero) e no maximo 8 casas depois do 
ponto decimal. A letra E representa urn expoente e deve ser 
seguido por um n&mero positivo ou negative de no maxima dois 
algarismos. Havendo somente zeros a esquerda do ponto deci- 
mal, el es nSo ser&o apresentadas. Se todos os algarismos 
depois do ponto decimal -forem zeros, entSo tanto o ponto 
decimal como estes zeros serSo omitidos. Exemplos : 



>PRINT 0.2 



0.460 

.46 



Na presen^a de um expoente, os sinais positivo e nega- 
tive serSa apresentadas. Um ".+ " £ apresentado quando o 
expoente -for positivo, e um "-" quando o expoente -far nega- 
tive. Vejamos os seguintes exemplos: 



Netaca'a Convene ional 


Notacofa Cientlfica 


1 000000000 


1E+09 


.000000001 


1E-09 


-123456789 


-1 . 23456789E+0B 


-.00123456789 


-l,23456789E-09 



VI 1 1. 2. TIPOS DE OPERATES NUMERICAS 

Conforme vimos no inicio deste capltule, as operates 
no TK-2000 COLOR podem ser divididas em tres categorias, 
conforme descrevem os sub-Itens a seguir. 



VIII. 2.1. Operates Numericas 

Os slmboles usados neste tipo de operaca'o sKo: +>-? 

t ' * — 

Este tipo de opera^So j& -foi bastante discutido na ser 

5:^0 1 1 1. 2 



VIII. 2. 2. Operas oes Comparati vas 

A tabela a seguir indica os tipos de operates compara- 
ti vas, bem como os respect ivos simbolos usados pelo TK-2000 
COLOR. 
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* QPERACAO * SIMBOLO * 
* , * * 

* men or que * < * 

* . #. , ^. 

* maior que * > * 
# * # 

* igual * = * 
H . — „ m . . .„.. , — ,„, # , — , — ,_™. — * 

* diferente de * <> * 
#, £. # 

* maior on igual a # >= * 
.* p * 

* men or ou igual a * <= * 
a-********************************************** 

■Tab el a VIII. 1- 



Estes sinais de opera^So sSo usados para comparar dais 
nCtmeros. No TK-2000 COLOR, se a comparapa'o -for verdadeira, 
ele -fornecera- o valor urn (1); se nSo for, ele fornecerS o 
valor zero (0) 

Observe o programra seguinte. 

>NEW 

>10 PRINT 5>4 
>20 PRINT 4=5-1 
>30 PRINT 10=3*4 
>40 PRINT 3<=6/2 
>50 PRINT 9-8 >=5 
>60 PRINT B~5<4 
>70 PRINT B-3015/3 

Antes de rodar o programa vamos prever os resultados. 



Li nha 



Verdadei ro/Fal so 



Result ado 



10 
20 
30 
40 
50 
60 
70 



V 
V 
F 
V 

F 
V 

F 



1 
1 

1 

1 



Apis digi tar RUN teremos ent&o: 

>RUN 

1 

1 



1 


1 
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VI I I. 2. 3. Operaf&es Lbgicas 

Pade-se ver, na tabela VI 1 1. 2 as operates logieas 
disponlveis, bem como seas respect ivas simbolos. 



OPERAfAO 


SIMBOLO 


E 

Ou 
Negaf So 


AND 

OR 

NOT 



Tabela VIII. 2. 

Cada urn destes operadores l&gicos tern a sua tabela 
verdade, que indicam, a partir de certas entradas (1 ou 0) , 
resultados determinado. Nestas tabelas, as entradas sSo 
apresentadas antes do sinal de igualdade, e as saidas apis 
estes, con-forme se ve nas Tabelas VI 1 1. 3, VIII. 4 e VI 1 1. 5 



TABELA VERDADE DA OPERAND E 


Entrada 


Salda 


1 AND 1 
1 AND 
AND I 
AND 


1 






TABELA VI 1 1. 3 



TABELA VERDADE DA OPERA£AO OU 


Entrada 


Salda 


1 OR I 

i OR 
OR 1 
OR 


1 

1 
1 





TABELA VI 1 1. 4 



TABELA VERDADE DA OPERACAO NOT 


Entrada 


Saida 


NOT 1 
NOT 


§ 

i 



TABELA VI 1 1.5 



Seguem alguns exemplos do uso destas operates 



1. ) 



>PRINT (5>4) AND <3>2> 
1 



P&ra entender melhor o resultado da opera^So acima, 



podemos dividi-la em duas partes, 
parativas e a operafSo l&gica. 

Operates Comparativas 



que s^o as DperacOes com- 
Qpera(;So Logica 



S>4 
3>2 
2. ) 



verdadeiro 



verdadei ro 



1 AND 



ver tabela 1 
verdade AND 



>PRINT <3<2) OR (1<0> 




Vamos esquematizar da mesma -forma que no exemplo 

anterior, 



Opera^fles Comparativas 



FALSD 







1<0 



FALSO 







Opera^o Logica 



OR ver tabela 
verdade DR 






>PRINT NOT (5>4) 




Utilizando o mesmo esquema dos exemplos anteriores temos: 
Opera^&o Comparati. va Operaccto L5gica 



5>4 



verdadei ro 



NOT 1 ver tabela NOT ,0 



Agora digite o programa a seguir e antes de pressionar 
RUN, procure prever sens resultadas ; 

>NEW 

>10 PRINT NOT ((3+4) >- 4) 
>20 PRINT (7=8) OR (4 * 6 > 3 * 4) 
>30 PRINT C9 > 8> AND (5 > 3) 

>40 PRINT (9 * 2 > 3 * 5> AND (2 * 3 > 54 * 2) 
>50 PRINT NOT (3=2) 
>60 PRINT (2 = 3) OR <21 = 7 * 3) 
Apos pressionar RUN teremos: 
>RUN 

1 
1 

1 
1 
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VI 1 1.3. NOVAS OPERApDES COM CADEIAB 

Coma ja vimos, urn slmbola * deve ser acrescentado a 
variavel tipo cadeia. As operates tipo cadeia utilisadas no 
TK-2000 COLOR s&q mostradas a seguir: 



LEN (A*) STR*(X> VALCA*) CHR*CX) ASC<A*) 
LEFT* (A*, X) RIBHT*(A* !1 X) MID* (A*, X, Y) + 



Ja apresentamos no capltulo V, algumas operacdes de 
cadeia: 

LEN(A*) LEFT*(A*,X) RIGHT* (A*, X ) MID$<A*,X,Y) 

Ha cinco operacdes que nJto -foram estudadas aindaj, e que 
serSo apresentadas neste capltulo., 

STR*CX) j + , VAL(A$> , CHR* < X ) e ASC(A*> 



VI 1 1. 3.1. 5TR*(X> e >* + " 

STR representa "cadeia". STR* signi-fica que o valor do 
numero X entre par§nteses sera convert! do numa cadeia. For 
exempla: 

>NEW 

>10 A = 123 

>20 8 = 456 

>30 A* - STR* (A) 

>40 B* = STR«(B) 

>50 PRINT A* + B* 

Apfts o comando RUN teremos: 

>RUN 
123456 

Note que no example anterior, ao inves dos dados 123 e 
456 serein tratados como numeros, cujo resultado da soma 
seria 579, el es -foram tratados coma cadeias, e portanto o 
sinal " + " -fez com que ■fossem apresentados em ordem 
sequencial (123456). 

programa seguinte, transforma sete numeros em dois 
grupos;, separadas por urn hi-fen, como se usa na notacSo dos 
numeros telefoni cos. 

Exemplo! 

2879742 287-9742 

5498126 549-8126 

8815979 881-5979 
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>NEW 

>10 HOME 

>20 INPUT "NUMERO DO TEL. ";A 

>30 B* = STR*(A) 

>40 C* n LEFT* <B*, 3) 

>50 D* ■ RIGHT* (B*,, 4) 

>60 PRINT C* * "-" + D* 

>70 GOTO 20 



Antes de rodarmas este programa. 
sequencia de instruffles (fig. VIII. 1) 



vamos analisar sua 



HOME (limpa a tela e posiciona. o cursor em seu inicio) 



INPUT 


"NUMERO DO TEL.: " I A (apresenta o texto NUMERO DO^ 






TEL.: e aguarda a digitacSfo de um 






n timer o de 7 dlgitos a ser as- 






sociado com a variavel numerica 


" 




A) . 


B* 

1 


= 


STR*(A) (assDcia a variavel numerica A a variavel- 
tipo-cadeia B*> 


▼ 
C* 

1 


= 


LEFT*(B*,3) (associa os tres primeiras caracteres a 
cadeia B* a variavel tipo cadeia C$) 


▼ 
D* 

| 




- RIGHT* (B*., 4) (associa os quatro ultimos caracteres a 

variAvel-tipo-cadeia D*) 


PRINT 


C$ + "— " + D* (-faz com que sejam apresentadas em ordem 








sequencial a cadeia C*, o car&cter hi fen 








( — ) e a cadeia B*) 


i 


i 






GO 
J 


TO 


20 (desvia o programa para a linha 20) 



Fig. VIII, 1. 



A figura VIII. 2 apresenta um e^emplo de tela que 
poderia ser gerada por este programa. 



NUMERO DO TEL. 2879741 

287-9741 

NUMERO DO TEL. 5475127 

547-5127 

NUMERO DO TEL. 8818969 

NUMERO DO TEL. 



Fig. VIII. 2. 
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VIII. 3.2. VAL<A*> 

VAL § a abreviac&o de valor „ A instrucSo VAL (A*) 
executa exatamente a fun;So inversa de STR$. Observe o exeirt- 
plo abaiKOl 

>NEW 

>10 A* = "12" 

>20 B$ - "13" 

>30 X* §* A* * B* 

>40 Y = VALiA$> 4- VALCB*) 

>50 2 - VAL (A*) * VAL<B$) 

&m PRINT X*, Y. Z 

Apc.s emitir a ccraando RUN serKo apresentados as numeros: 

>RUN 

1213 25 156 

Mote que en quanta X* corresponds a soma das cadeias 
12" e "13", Y vale a soma dos numeros 12 e 13. 



n 1 nn 



VIII. 3. 3. Cbdigo ASCII 

ASCII e a abreviacSo de "American Standard Code -for 
Information Interchange" , ou seja,, C6digo Standard Americano 
para InterccKnbio de Inf orma^oes. 

Sahemos que □ computador opera somente na base binaria. 
Podemos representar caracteres alfabeticos (A P B f C „ . ) ., 

numericos i$. a % 9 % ) ou simbolicos < + .»-,,*„/.,.„..) usados no 

computador , por meio de codigos binarios. Poderiamos 
assDciar de varias formas estes caracteres a codigos 
binarios, por em a padronizafSo desta associaca-o e muito con- 
veniente & permite a compat 1 bi 1 :i. dade entre diversas 
produtos, tanto em termos de "software" como de "hardware". 
Por este motive, o codigo ASCII 1 urn dos mais populares. 

A letra A no cod i go ASCII e representada pelo nttmero 
binario 01000001 que e 65 no si sterna decimal. "L" em ASCII 
e representado por 01001.100 que i 76 na base decimal. Cada 
caractsr alfabetico, numerico ou simbolico corresponds a urn 
codigo ASCII especi-fico e, para facilitar seu 
reconhecimento, pode-se representa-1 o na base decimal. A ta- 
bela a seguir indica o codigo ASCII na base decimal dos 
caracteres alfabeticos. Uma vez que urn byte e formado por 8 
bits,, o que torna possivel 256 combinacdes >:2'''8 = 256), os 
caracteres representados pelo codigo ASCII na base decimal 
estSo sempre entre e 255. 
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CARACTER 


ASCII NA BASE 


A 


65 


B 


AA 


C 


67 


D 


68 


E 


6? 


F 


70 


G 


71 


H 


72 


I 


73 


J 


74 


K 


75 


L 


76 


M 


77 



CARACTER 


ASCII NA BASE 


N 


78 





79 


p 


80 


Q 


81 


R 


82 


S 


83 


T 


84 


U 


85 


V 


86 


w 


87 


X 


88 


Y 


89 


Z 


90 



Tabela VIII. 6 

Na linguagem BASIC;, usa-se duas instrufdies para 
converter valores ASCII em caracteres e vice-versa, con-forme 
descrevem os pr'fiximas sub- £ tens. 



VIII. 3. 3. a ASC(A*) 



ASC e 

instrucSo e 



a abreviatjao de ASCII. D formato basico desta 



ASC (cadeia) 

- 

Note entretanto que, embora se possa incluir Lima cadeia 
entre parfenteses ap&s a instrufSo ASC, apenas o primeiro ca~ 
racter desta tera seu valor calculado. Execute os comandos 
abaixo para comprovar o -fata. 

>PRINT ASC ("A") 

65 

>PRINT ASC<"AB") 

computador apresenta 65 nos dais e::emplos acima. 
Podemos concluir portanto que o caracter B no segundo 
eiiemplo nSo -fez diferenca e que, o computador apresenta o 
valor no c&digo ASCII em decimal. 

Os par£nteses apcbs ASC podem seu usados tamb^m com 
outras operacdes com cadeias. Ve j a nos exemplos a seguir que 
os resultados das dois programas s&o os mesmos. As duas or- 
dens das linhas 20 "e 30 do primeiro programa sa"o iguais as 
da linha 20 do segundo programa. 
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1 programa: 



>NEW 

>10 A* = "MICRO" 

>20 B$ = MID*<A*,3, 1) 

>30 PRINT B* ; " = " ; A5C<B$) 

>40 EMD 



2 programs: 

mm 

>10 A* = "MICRO" 

>20 PRINT MID* (A*, 3, i);" = "; ASC ( MID*C A*, 3, 1 > > 

>30 END 

Nas exemplos apresentados, sendo A* relacionada com a 
cadeia MICRO, obtemos o terceiro cara.izter atrav&s da instru- 
c&o MID*( A*, 3, 1). resultado apressntado e 67 que e o 
c&digo ASCII decimal de C. 

Para fixar o concetto, execute o programa a seguir: 

>NEW 

>10 A* = "MICRO" 

>20 B m LEN <A$) 

>30 FOR I = 1 TO B 

>40 PRINT MI DSC A*, I, 1), ASC ( MID$< A*, I, 1)3 

>50 NEXT I 

Certamente, voc& consegue prever o resultado deste 
programa. 

>RUN 

M 77 



x /,> 

R 82 

J ■ 

VI I I. 3. 3. b. CHR*<X) 

CHR$ indica caracter. CHR$ | usado para transformar _o 
c&digo ASCII decimal em caracteres ASCII. Por exemplo! 

>PRINT CHR$<65) 
A 

, Conforme podemos observar, esta e a opera^So inversa de 
PRINT ASC ("A") . 

Para construir uma tabela de valores decimals e seus 
correspondentes slmbolos ASCII, pode-se executar o pr6ximo 
programa. Este programa comeca com o valor decimal 32, uma 
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vez que antes de 32 ha alguns oodigos de control e de tela 
que podem inf luenciar a operac&o do computador. 

>NEW 

>10 HOME 

>20 FOR I m 32 TO 94 

>30 PRINT Ij " " !CHR*(I) , 

>40 FDR K = 1 TO 500: NEXT K 

>50 NEXT I 

>60 END 



Apds digitar RUN, podemos observar -formacSo da tabela a 
seguir : 



32 




35 


# 


38 


& 


41 


1 


44 


* 


47 


/ 


50 


2 


53 


5 


Do 


8 


5? 




62 


> 


65 


A 


68 


D 


71 


6 


74 


J 


77 


M 


80 


p* 


83 


8 


86 


V 


89 


Y 


92 





33 
36 



i 
* 

* 



51 


3 


54 


6 


57 


9 


60 


< 


63 


*7 


66 


B 


69 


E 


72 


H 


75 


K 


78 


N 


81 





84 


T 


87 


W 


90 


z 


93 


1 



34 


" 


37 


*/. 


40 
43 

Ht> 

49 


( 

+ 

• 

1 


52 


4 


58 


7 

■ 


61 


=3 


64 


@ 


67 


c 


70 
73 


F 
I 


76 


L 


79 





82 


R 


85 


U 

V 



94 



Note que o caracter correspondents ao numero 32 esta 
em branco. Isto porque, con-forme ja pudemos observar, para o 
computador, d espaco em branco tamb&m & considerado um 
caracter, cujo valor ASCII decimal e 32. 



VI I I. 4. MATRIZES 



* po- 
Por 



As variaveis apresentadas ate agora eram sempre rela 
cionadas a um anico valor por vez. Atraves das matrizes 
de-se associar mais que um valor a uma variavel. 
exemplo, suponhamos que se tenha uma fileira de 5 caixas. 
Podemos nos referir a esta -fileira de 5 cai;<as pelo nome A, 
e a cada caixa, indi vi dualmente pelos nomes A<0>, AC1), 
A(2), AC3) e A<4), con-forme ilustra a -Figura abaixa. 
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Fig. VII. 3. 

A matriz representada acima e chamada de unidimensi o- 
nal . Ds ntuneros apresentados entre parenteses que especi-fi- 
cam cada urn dos elementos da matriz, sa"o sempre chamados de 
indices. 

De forma semelhante podemos ter matrizes bidimensional 
Assim, os pre^os e velculos, de acordo com o ano de fabrica- 
fSo, podem ter sens valores registrados numa matriz bidimen- 
sional. Para encontrarmos entKo urn determinada valor devere- 
mos -fornecer o modelo do veiculo Cna coluna) e seu ano de 
-fabricac&o (linha). 





1983 


1982 


1981. . . 


F'assat SL 


4.740.323 


3.191=782 


1.732.521 


Ford Corcel SL 


4.605.713 


2.640. 128 


1.631.677 


Belina SL 


4.934.501 


2.697. 151 


2. 141. 120 


Mons a SL 


5.245.205 


2.937.286 


— 


Fiat SL 


*r ■ X c>vJ i «*^7 ji 


2.341.526 


1.437.261 



Tabela VIII. .7. 



A -figura a seguir representa uma matriz bidimensional.: 



A 


f HC 


Tl 


i J 


| 


A A(0,0) 


II A(l£» 


A(2,0> H 


1 


J 


1 


M0 } \) 


A0,l) 


A(2,l) 



Fig VI 1 1. 4 
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A matriz representada tern dimensoes 2x3, ou seja, tern 

duas linhas e tres col Unas. 

Numa matriz tridimensional, alem de colunas § linhas, 
podemos ter nlveis. Suponba que, num predio, na"o saibamos a 
numeracSo dos apartamentos. Poderemos local izar ent&o urn 
determinado apartamento dizendo: 3o andar Cnivel), de 
■frente para a ma (linha), do canto direito (coluna). Na 
■figura VIII. 5 e representada uma matriz tridimensional cujas 
dimensoes sao 2x3x2 que corresponde a 2 linhas, 3 colunas 
por 2 nlveis. 



=E=I 



A(Opl) ll A(IA» I f A{2p,l) 



MO,t,t) 



A(l,l,l) 



A(Z,l,i) 



IE 



X 



A A<0,0,0) ] AOAO) II AC2AC)" 
A(0,l,0) A0,l,O) A(2,l,0) 



Fig, VIII. 5 



Poderiamos ainda ter mais de tr§s dimensoes numa matriz 
porem, a representacSo visual alem da tridimensional n^o e 
possi vel . 

No TK-2000 COLOR, as matrizes podem ainda ser divididas 
em tres grupos: 

a) variaveis-tipo-matriz inteiras, tais como : 
A7.<8,5) , B7.«2,4) 

b> variaveis-tipo-matriz reals, tais como : 
A<9,9) , D(5,9> ..... 

c) variaveis-tipo-matriz cadeias, tais como : 
A*(10,5) , C*<6,8) ..... 



VIII. 4.1 



DIM 



A instrufjcto DIM e impresci ndi vel para o uso de matrizes 
num programa. Uma instruc&o permite que se dimensione na 
mem&ria do TK-2000 a ^.rea necessaria para center todos os 

dados de cada matriz. 

i 
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VI 1 1. 4.1- a Matrizes Uni dimensional a 

DIM AC20) e uma matriz unidi mensi dnal , e indica que a 
name da matriz e A e e>:istem ao todo 21 variaveis, de A(0) 
at© A (20). metodo de acesso a estas 21 variaveis e o mesmo 
que usado normalmente para qualquer variavel comum. Toda a 
variavel contida numa matriz de quaisquer dimensfles e sempre 
acesslvel. Por exemplo, pode-se utllizar uma ordem do tipo : 

A (5) - 32 + A (6) 

Esta ordem -faz cam que, apos adicionar 32 bo nftmero 
associado a variavel A(6), coloque-se o resultado em A<5). 
Como ja descrito, 5 e 6 sSa chamados Indices. Qs indices s5o 
usados para se ter acesso a uma determinada variavel Cou 
elemento) de uma matriz. 

programa a seguir atribui a todos os elementos de uma 
matriz o valor 1 . 



>NEW 

>10 DIM AC12) 

>20 FOR I - 1 TO 12 

>30 A(D = 1 

>40 NEXT I 

>50 FOR I = 1 TO 12 

>60 PRINT A CI) , 

>70 NEXT I 

>S0 END 



Ao rodarmos o programa, teremos enta"o o seguinte 
resultado : 

>RUN 

1 1 1 

1 1 1 

\ 1 1 



Vamos analisar o -fluxo deste programa na -f i gura VI 1 1. 6 
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DIM A(12) (dimensions a matriz A como unidimensi onal de $'3i 
el ementos. ) 

FDR I = 1 TO 12 (fas com que I varie de 1 a 12) 

A(I> = 1 (atribui ao elemento A(I> da matriz A ao valor urn) 

NEXT I (acrescenta 1 a variavel e volta a linha 30. Se 1=12 
segue o programa) 

FOR I * l TO 12 (-Fas com que I varie de 1 a 12) 4 

PRINT ACI), (apresenta o elemento A(I) da matriz A) 

NEXT I (acrescenta 1 a variavel e volta a linha £0. Se 1=12 
segue o programa) 

END (-final iza o programa) 

> 

Fig. VIII. 6 

Vamos agora executar a programa: 

>NEW 

>10 DIM AX (9) 

>20 A7. ( 1 ) = 1 

>30 FOR I « 2 TO 9 

>4gi e = I - 1 

>m A7. (I) a AX CE) + I 

>6>0 PRINT "AX ( " ; I ; " ) = " ; AX ( I ) , 

>70 NEXT I 

>80 END 

Terernos como resultada deste programa: 

>RUN 

AX (2) =3 AX (3) = 6 

A7. (4) = 10 AX (5) * 15 

AX (6) m 21 AX (7) = 28 

AX (8) = 36 AX (9) = 45 

■ 

VIII. 4. l.b. tlatrizes Bi dimensi onai s 

programa . seguinte mostra como utilizar matrizes de 
duas dimenso"es. 
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>NEW 

>10 DIM A(3,3) 

>20 FDR I = 1 TO 3 

>30 FDR J = 1 TO 3 

>m a(i,jj = i * j 

>50 NEXT J 

>60 NEXT I 

>70 FOR I = 1 TO 3 

>B0 FOR J * 1 TO 3 

>85 PRINT M A<"; t$ ","', J; ") = "; AC I, J); " "; 

>90 NEXT J 

>100 FRINT 

>110 NEXT I 

>120 END 



Segue sua exscu^So 

mm 

ACl, IX = 1 A(l ; 2) = 2 fl(l,3) = 3 

A(2,l) = 2 A(2,2J = 4 A(2,33 - 6 

AC3,1) = 3 A<3,2> ft 6 A<3,3) = ? 

VIII. 4. l.c Matrizes Tridimensionals 

Observe no exemplo a seguir o liso de matrizes de tres 
dimen5ibes n 

>NEW 

MM DIM A(3,3,3> 

>20 FOR I m 1 TO 3 

>30 FOR J = 1 TO 3 

>40 FOR K = 1 TO 3 

>50 A<I,J P K) = I * J * K 

>60 NEXT K : NEXT J : NEXT I 

>70 FOR I = 1 TO 3 

>S0 FOR J = 1 TO 3 

>?0 FOR K = 1 TO 3 

>100 PRINT "At"; || ","; J; " , " j K; 

" ) = "j A(I, J,K); " "s ' 
>U0 NEXT K 
>130 PRINT 

>140 NEXT J : NEXT I 
>150 END 

Veri-fique voc# mesmo o resultado deste programa. 

VI I I. 4. 2 STORE E RECALL 

Estes comandos sKo especl f i cos para grava^So ou leitura 
em fita cassete de arrays numericos, inteiros ou reais. 
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Deve-se observar que estes arrays devem ter si do 
di mensionados igualmente na gravat^So e na posterior leitura. 

Tome como exemplo o programa do item VI 1 1. 4. I.e., na 
linha 150 paderia-se colocar: 

>150 STORE A 
>160 'END 

e com o gravador ligado em RECORD, a matriz f icaria 
armazenada em -fita cassete para uso posterior. 

Para se recuperar a matriz, utiliza-se o camando 
RECALL: 

>10 DIM XC3,3,3) 
>20 RECALL X 
>30 FOR I = 1 TO 3 
>40 FOR J = 1 TO 3 
>50 FOR K = I TO 3 

>60 print "X<"sk; ", "; J; *', "; l; ") ■ ";X<K,J,i) 

>70 NEXT : NEXT : NEXT 
>80 END 

Note que para se recuperar a matriz nSo e necessario se 
dar o mesmo nome para o camando DIM, porem as dimenso"es da 
matriz devem ser as mesmas, du na pior das hip&teses, a 
terceira dimensSo podera ser maior no RECALL, como por 
exemplo DIM X (3,3,5). Neste caso, os pontos excedentes da 
matriz estao contenda dados aleatforios. 



VI 1 1. 4. 3. COMANDO MOTOR 

comanda MOTOR e utilizado para se ligar ou desligar o 
gravador atraves de sen control e remoto. 

Como padem ser usados dois gravadares, ha duas saidas, 
atras de seu TK-2000 COLOR especi-ficas para este comando. 



MOTDR0 - desliga o gravador A 
MOTOR! - liga o gravador A 
M0T0R2 - desliga o gravador B 
M0T0R3 - liga o gravador B 

Este e urn 6timo comando no caso de atualiza^So de 
matrizes, no qual , num gravador estao as matrizes antigas e 
no outro irSo ser gravadas as matrizes atualizadas. 

Recomenda~se usar urn comando FOR X = 1 TO 100 : NEXT 
ap&s cada comando de M0T0R1 ou M0T0R3 devido a inercia dos 
motores dos gravadores e antes de cada comando MOTOR0 ou 
M0T0R2 pelo mesmo motivo. 
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FACA SEU RESUMO 

1. As operafdes comparativas e seus respect ivos slmbolos no 

TK-2000 COLOR sa*o: <<) , ...... (>) , 

C = ? j, diferentede (.. ..) 

.... (...) e men or on igual a ( ) 

2. Duando uma comparaca"o -for verdadeira, seu resultado sera 
e quando -Fal sa 

3. As operates logicas permitidas pelo TK-2000 COLOR s&o 
<E) , (OU) e (negacao) . 



$>, Os resultados das operacoes abaixo sKo: 

AND = 1 

1 AND m 

AND 

1 OR 1 

OR = 1 

a... ...... OR ......a,. — 

1 = 

5. A instruct (X) converts o valor do nCimero X em 

uma cadeia. 

6. resultado da ordem PRINT A* + B$ , e a 
apresenta^^o das cadeias A$ e B$ | em .......... 

7. A instrucSo que permite a uma cadeia A$ -Formada por 
algarismos numericos ser trans-Formada em variaveis numericas 
fe : . (A*) 

8. codigo utilizado pelo TK-2000 COLOR, que relaciona 
caractsre^ a nfrmeros na base binaria e o 

*?. Para que o valor ASCII na base decimal, da letra C seja 
apresentado no- video, pode-se usar a ordem: 
FRINT .........( C 1 ) 

10. De •forma inversa, se quisermos que o cAracter associado 
ao numero 77 seja apresentado na tela, pademos emitir a 
ordem: PRINT C77) 

11. A instrucSo DIM permite uma a ser 

utilizada no programa. 



12. A instructor DIM A'/.<8,5) define uma matriz de 

dimens&es, com ate variaveis 

Respostas 

I. raenor que, maior que, igual, <>, maior ou igual a , >—, 
< = ; 2. 1, j 3. AND, OR, NOT; 4. 1,1, 0, 0, 1, 1, 0, 0, NOT; 
5. STR*; 6. sequencia; 7. VAL; 8. ASCII ;9. ASC; 10. CHR*; 

II. dimensi onar , matriz; 12. duas ; 40, inteiras. 
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CAPITULQ IX- INSTRUpDES DE ENTRADA E SAIDA 

As instru^Ses descritas neste cap J. tulo tern par -funfSo a 
entrada e sal da de dados em urn programa ou a apresenta^So de 
dados na tela. Lima instru^ao de entrada e uma de sal da ja 
-foram utilizadas em capitulos anteriores; sSo elas respecti- 
vamente: INPUT e PRINT. Ds I tens a seguir apresentarao as 
novas instrufO'es. 



IX. 1. DATA READ 

As instrutfdes DATA e READ sSo normal mente usadas em 
con junto, ou seja, se urn programa contiver Lima ou mais 
instruffiJes DATA, devera ter pelo menos Lima instrufeiD READ. 

A instruf^o DATA permits definir urn con junto de dados, 
separados por virgulas, que devercla ser lidos sequencialmen- 
te pela instru^cfo READ. Normal mente , por uma questa"o de 
organisacao ? a instruc&o DATA & incluida no inicio ou no 
-final do programa, porem nada impede que el a seja colocada 
em qualquer outra parte do programa. Ds e>;emplos a seguir 
esclarecem a utiliaa^So destas instrucftes. 



E>c empl o 1 . 



>NEW 

>10 DATA "BANANA" 

>20 HOME 

>30 READ A* 

>40 READ B* 

>50 READ C* 

>60 READ D* 

>70 PRINT A* 

>80 PRINT B* 

>90 PRINT C$ 

>100 PRINT D$ 

>110 END 



"UVA", "LIMA", "PERA" 



A figura IX. 1 apresenta os resultados deste programa. 



BANANA 
UVA 
LIMA 
PERA 



^ 



Fig. IX. 1 

Ex empl a 2: 

resultado do primeiro exemplo pode tambem ser obtido 
usando-se apenas uma vez a instru^So READ. 
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>NEW 

> 10. DATA "BANANA", "OVA", "LIMA", "PER A" 

>20 HOME 

>30 READ A*,B*,C*,D* 

>40 PRINT A$ 

>50 PRINT B* 

>60 PRINT C$ 

>70 PRINT D* 

>80 END 

E>; emp Id 3s 

Pode-se tambem usar apenas urn nome de varUvel: 

>NEW 

>J0 DATA "BANANA", "UVA", "LIMA", "FERA" 

>20 HOME 

>30 FOR I m 1 TO 4 

>40 READ A* 

>m PRINT A* 

>60 NEXT I 

>70 END 

E^emplo 4: 

Os dados utilisacfos podem sar distribuJdos em mais de 
uma instrufSto DATA. 

>NEW 

>10 DATA "BANANA" 

>20 DATA "UVA" S "LIMA" 

>30 DATA "PERA" 

>40 HOME 

>50 FDR I - 1 TO 4 

>60 READ A* 

>70 PRINT A$ 

>80 NEXT I 

>?0 END 

Esta modal idade e parti cularmente fltil quando a 
quantidades de dados e muito grande. 

E>;emplo 5: 

A in struma DATA tambem pode ser utiliaada no final do 
programa. 

>NEW 

>10 HOME 

>20 FOR I = 1 TO '4 

>30 READ A$ 

>40 PRINT A$ 

>50 NEXT I 

>60 DATA "BANANA", "UVA", "LIMA", "PERA" 

>70 END 
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Exemplo &>i 

Da mesma forma que no inicio ou no -fim, a instru^o 

DATA pode ser inclulda durante a programs. 

■ 

>NEW 

>10 HOME 

>20 DATA "BANANA", "UVA" , "LIMA'S "PERA" 

>30 FDR I ■ 1 TD 4 

>40 READ A* 

>50 PRINT A$ 

>60 NEXT I 

>70 END 

Exemplo 7" 

Os dados contidos na instru^ao DATA podem ser cadeias, 
inteiros ou reais, devendo-se apenas ter o tuidado de asso™ 
ciar ao dado o devido nome de variavel. programa abaixo 
utiliza dados-tipo-cadeia e reais na instru^cto DATA. 

>NEW 

>10 DATA 2,3,2,4, "BANANAS", ,, UVAS" 

>20 DATA " LI MAS", "PER AS" 

>30 HOME 

>40 READ A, Bj,C»D s A*, B*, C$, D$ 

>50 PRINT A; " "?A* 

>60 PRINT B; " ".;B* 

>70 PRINT c; " ";c* 

m® PRINT D; " "?D* 

>?0 END 

Apos digitar o comando RUN, teremos uma tela na -forma 
mostrada na fig- IX. ,2 



2 BANANAS 

3 UVAS 
2 LI MAS 

4 PERAS 



^ 



Fig. IX, 2 

Enemplo 9; 

0s dados lidos pela instru^^o READ e associados a name 
de variaveis podem ser usadas para qualquer tipo de 

apera^So. 

>NEW 

>10 DATA 4,2,8,3 
>20 READ A,B,C,D 
>30 E = A ■'- B / C + D 
>40 PRINT E 
>50 END 
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resultado deste pragrama e s apresentacSo do nftmero 5 
na tela I 4 A 2 /8+3=16/8+3=2+3=5) 

Exemplo 9: 

uso das instrufflea DATA READ em con junto com as 

matrices 1 uma importante ferramenta de programacSo. 

>NEW 

>10 DIM ACS) 

>20 FOR I = 1 TD 8 

>30 READ A < I ) 

>40 NEXT I 

>45 FOR I = 1 TO 8 

>50 PRINT "A < " ; I; " J = "jACI), 

>60. NEXT I 

>70 DATA 12,13,43,21,56,78,9,102 

>80 END 

Ap6s emitir RUN teremos: 

>RUN 

AU> = 12 A(2) = 13 

AC3) = 43 A(4> = 21 

A<5> = 56 A(6) = 78 

A(7) m 9 AC8) = 102 

E^emplo 10: 

i 
Sg nem todos os dados da instruct DATA forem 

utilizados, o compatador ignora os dados restantes. 

>NEW 

>10 DATA 51,62,74,55,92,11 

>W HOME 

>30 READ A,B,C 

>40 PRINT A,B,C 

>50 END 

resultado deste programa sera; 

>RUN 
51 62 74 

Importante: No uso da instruca'a READ deve-se estar atento 
aos seguintes -fatos ! 

1) associar o nome-de-var iavel correto a cada tipo de 
dado (cadeia, real on inteira), 

2) a operacSo READ na"o pode ser utilizada mais veses do 
que o nCimero de dados contidos na(s) instrucSo (5es) 
DATA. 
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Par exemplo: 

>NEW 

>10 DATA "BANANA'V'UVA'V'LIMA", "PERA" 

>20 FOR I = 1 TD 10 

>30 READ A* 

>40 NEXT I 

Este tipo de erro faz com que o TK-2000 COLOR apresente 
a mensagem de erro : 

7NA0 HA MAIS DATA #ERRO EM 30 



IX. 2. RESTORE 



A instruca'o RESTORE -Faz com que os dados da instruca'o 
DATA vol tern a ser lidos de maneira que as mesmos possain ser 
novamente manipulados. Observe o exempla abaixa; 



>NEW 

>10 DATA 1,2,3 
>20 HOME 
>30 READ A 
>40 PRINT A 
>50 RESTORE 
>60 READ A,B 
>70 PRINT A,B 
>B0 RESTORE 
>90 READ A,B,C 
>100 PRINT A,B,C 
Mllil END 



resultada deste programa e apresentado na figura a 
seguir : 



1 2 

1 ji J 

Como se pode observar, cada vez que surge a instruca'o 
RESTORE;, os dados de DATA vol tarn a ser lidos desde o inlcio 
pel a proxima instru^So READ. 

programa a seguir apresenta as notas de 4 bimestres 
de Lima determinada materia da escola e em seguida, aplicando 
as pesos de cada bimestre, tira a media anual desta materia. 
Suponhamos que as notam se j am B, 7, 5 e 9 e os pesos dos 
bimestres 1, 2, 3 e 4. 
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>NEW 

>10 REN NDTAS DOS BIMESTRES 

>20 DATA 8,7,5,9 

>30 REM FESOS DOS BIMESTRES 

>40 DATA 1,2,3,4 

>45 HOME 

>50 PRINT "AS NDTAS SAO " 

>60 READ A,B,C,D 

>70 PRINT "PRIMEIRO BIMESTRE- ";A 

>80 PRINT "SEGUNDO BIMESTRE- "|B 

>90 PRINT "TERCEIRD BIMESTRE- "jC 

M00 PRINT "QUARTO BIMESTRE- "sD 

>U0 PRINT PRINT 

>120 RESTORE 

>130 READ/ BI,B2,B3,B4, X, Y, Z,W 

>140 F= Bl * X + B2 * Y + B3 * Z * B4 # W 

>1.50 G=X+Y+Z+W 

>160 H = F / G 

>170 PRINT " A MEDIA ANUAL E ! ";H 

>180 END 

A -figura abaixa indi ca o resultado deste programs : 

AS NDTAS SAO £ 
PRIMEIRO BIMESTRE- 8. 
SEGUNDO BIMESTRE- 7 
TERCEIRQ BIMESTRE- 5 
QUARTO BIMESTRE- 9 

A MEDIA ANUAL E : 7.5 

Fig. IX. 4 

Coma 5e pade abservar, os dados da linha 20 -faram 
utilizados duas vezes, 

IX. 3. GET 

A forma geral da instrufSo SET & : 

GET nome-de-var javel 
Esta instrufSo executa as seguintes operates : 
i. Interrompe o programa 

2. Aguarda a digita^So pelo operador de urn a e apenas 
uma tecla correspondents a urn caracter. 

3. Associa o caracter digitado ao nome-de-vari aval 
contido na instrufSto. 

4. Prossegue o programa apos a digitado do caracter 
pelo operador. 



programa a seguir fornece urn exemplo do uso da 
instrufa'o GET. 

>NEW 

>10 HOME 

>20 PRINT "VOCE PREBSIONDU A TECLA "S 

>30 GET A* 

>40 PRINT A* 

>50 GOTO 20 

S@ apo£ o comando RUN, pressionar as teclas M,I,C,R e 
0, a cada vez que surgir a mensagem "VOCE PRESSIONOU A TECLA 
" , sera obtida uma tela semelhante a -figura abaixo. 



VOCE PRESSIONOU A TECLA M 

VOCE PRESSIONOU A TECLA I 

VOCE PRESSIONOU A TECLA C 

VOCE PRESSIONOU A TECLA R 

VOCE PRESSIONOU A TECLA 



Fi g. IX. 5 



Esta instruca-o e muito atil quanda usada com as 
instruco'es condicionais, con-forme sera visto no capitulo XI. 



IX. 4. DEF FN 

A instruca"o DEF FN permi te que se defina fun^Ses no 
TK-2000 COLOR, con-forme demonstra o programa: 



>NEW 
>5 HOME 

>10 PRINT "X", "FN ACX) ' 
>20 DEF FN ACX) = X 
>30 FOR X = TO 5 
>40 PRINT X, FN A(X) 
>50 NEXT X 
>60 END 



2 + 3 * X + 1 



resultado do programa e do tipo. 



1 
2 
3 
4 
5 



FN A(X) 
1 
5 



Fig. IX. 6 



12: 



Ou seja, o programa aplicau as valores X = a 5 a 
fun?2to FN ACX) = X + 3X + 1. Vamos conferir os resultados. 

X = ► + 3x0+1 =1 

X = l » 1+3x1 + 1 =5 

X = 2 ► 2 + 3x2+1 =11 

X = 3 p. 3 + 3x3+1 = 19 

X = 4 ► 4 + 3x4+1 =29 

X = 5 ► 5 + 3x5+1 =41 

programa seguinte e uma extensSo do programa 
anterior. argumento da linha 60 FN ACI) e I com o mesrno 
e-feito de? X em FN A(X). 

>NEW 

>10 PRINT "X'V'FN ACX) "- 

>20 DEF FN ACX) = X * 2 + 3 * X + 1 

>30 FOR X = TD 5 

>40 PRINT X, FN ACX) 

>50 NEXT X 

>60 PRINT 

>70 PRINT "I", "FN A (I) " 

>80 FOR I = 1 TD 3 

>90 PRINT I, FN AM) +8 

>100 NEXT I 

>110 END 

Apos emitirmos o comartdo RUN teremos: 



>RUN 




X 


FN ACX) 


1 


5 


2 


11 


3 


19 


4 


29 


5 


41 


I 


FN AC I) 


1 


13 


2 


19 


3 


27 
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FAfA D SEU RESUMD 

I. A instru^&Q DATA permite definir urn conjunto de , 

Mtifparados par e que serSo lidos sequenci al mente 

pet! ft instruc&o ........... 



2. A instrLKfa'Q DATA pode ser incluida 

parte do programa. 

!3. Os dados a serem lidos pela ins-trufito podem 

|»r distribuidas em instrufdes DATA. 

'L Os dados contidas na instrufSo DATA podem ser inteiros, 

on ........ i porem na instrup&a. ......... . eles 

< lM*v(;,;m ser associados ao -....- correto, 

Pi A na"a ser quando so Lisa a instru^cto RESTORE, a n&mero de 
I »1 turas executadas por instrui^&es ncto pode ser su- 
per A or ao n&mero de ........ da instruct DATA. Caso este 

I m\ □ ocorra, o programa sera interrompido e o TK-2000 COLOR 
ipr esentara uma mensagem de 

fa, A instrufSo RESTORE -fas com que os dados da instru^Sto 

DAI A a ser lidos, a partir da dado, pela 

|ir out ma instrufcfo 

/. A -forma geral da instruca'o GET e: 
(BET> < - .-.....„> 

II. A instru^o GET executa as seguintes operacftes: 
...... a execufa'a do programa, aguarda a digitat^So de 

pelo operador; associa o ....... digitado ao 

nomdv-de-variavel contido na instrufSoS enta"o o 

|ir ngrama. 

V, A instru^^io permite que se defina uma -funfeKo 

»*m um programa. 



K'wtufjostas. 

I . i:l ^das, virgulas, READ; 2. em qualquerj 3. READ, diversas; 
4. reals, cadeias, READ, nome-de-var iavel 5 5. READ, 
(tad 03 1 erroj 6, vol tern, primeiro H READ; 7. nome-de-var i avel M ; 
II. interrompe, uma teela, caracter, prossegue; 9.DEF FN; 
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CAFITULO X- TRACANDQ GRAFICOS E FIGURAS 

Embora d conteudo deste cap! tula tamb^m faea parte das 
Inwtruco'es de saida, na"o foi apresentado no capltulo 
fldterior por se tratar de um grupo de instrucdes muito 
e'wpeciais, que permite a utilizaca'o da capacidade gra-fica e 
ih'llnica'o de cores (se estiver ligado a Lima TV col or i, da ) do 
II ■,'000 COLOR. 



X.l. COLOR 

A instruceto COLOR permite a definiciKo de cores no seu 
IV (se o seu TK-2000 COLOR estiver ligado a um televisor 
hi 1 .irico e preto, esta instrucSo sera inutil). 

GJuando o mi crocomputador e usado para o tracada de 
Ui "U f i cos coloridos, raramente e necessaria a gama muito 
vifli'iada de cores. TK-2000 COLOR permite que se usem ate 6 
(1 1 for entes cores? num mesma grafico. 



A tabela X, 
di f »rentes cores. 



1 indica os nomeros que se relacionam as 



- 


preta 


6 - 


cyan 


1 - 


azul 


7 - 


branca 


2 - 


verde 


8 - 


verde 


3 - 


branca 


9 - 


azul 


4 _ 


azul 


10- 


verde 


5 - 


vermelho 






1 .iht 1 <\ X.J 









11 - branca 

12 - branca 

13 - Vermel ho 

14 - cyan 

15 - branca 



A instrucao COLOR £ usada necessari amente 
I iml r ucao FLOT, con-forme descreve o proximo item. 



com 



K.2. PLOT, GR e TEXT 

Usar o TK-2000 COLOR para "pi ot Br" signi-fica, definir 
II i oordenadas horizontal e vertical e entSo colocar um 
IMimUj nesta posicSo. TK-2000 COLOR divide a tela em 48 
i iililnas (caordenada vertical) e 40 colunas (coordenada hori- 
IOnt*l). As coordenadas tern ent&o valores de a 39 na 
horizontal e a 47 na vertical. 

A forma basica da instruct PLOT e: 

PLOT X,Y 

onde X corresponde a coordenada horizontal e Y a 
vpr til <:al . 

timbora possa-se definir pontos isolados na tela, este 
(Htiiwdlmento n&o & usual pois, alem de n=(o -formar figura 
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nenhuma, a visual iza^^o se torna diflcil. 

mado gra-fico e iniciado pela instrufSo GR e 
desativada pelo comando TEXT. 

Os programas a seguir ilustram o uso de BR, COLOR e 
PLOT, fornecendo respect i vamente exemplos do tra^ado de una 
reta vertical azul e uma horizontal azul verde (cyan) 

E>: emp I o 1 : 



>NEW 

>10 HOME 

>20 GR 

>30 COLOR * 1 

>40 FOR I = TO 39 

>50 PLOT 20, I 

>60 NEXT I 

>70 END 



Fig. X» 1 Resultado do exemplo 1 



o, 



I .2..1: 



39 



.20. 



39 



OBSERVACAO: caso na"a surgirem as cores, procure ajustar a 
sintonia fina do canal de seu TV. 

Ex emp la 2: 



>TEXT 






>NEW 






>10 HOME 






>20 GR 






>30 COLOR = 6 






>40 FOR 1=0 


TO 39 




>S0 PLOT 1,20 






>60 NEXT I 




V 


>70 END 




1 
2 

i 

: 
2d 

■ 
• 
• 
* 






. 



I. 2 




39 



Fig.. X.2 Resultado do exemplo 2 
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H<~t ainda duas instru^a'es atrav^s 
dijisienhar linhas, camo veremas a seguir. 



das quais podemos 



X.3. HLIN e VLIN 

HLIN e VLIN indicant, respect ivamente linha horizontal e 
I i nha vert i cal . 

Atraves de HLIN, obtemos com menos instrucftes, as 
mi' fa mas resultados do 1 exemplo da se£a*o anterior: 

>TEXT 

>NEW 

>10 HOME 

>20 GR 

>30 COLOR = 1 

>40 VLIN 0*39 AT 20 

>50 END 

De -forma semelhante, o 2o exemplo da sec&a anterior 
|n;ide ser refeito atraves das instruffles. 

>TEXT 
>NEW 

>10 HONE 
>20 GR 

>30 COLOR = 6 

>40 HLIN 0,39 AT 20 

>m END 



X,4. SCRN 

A instrucSo SCRN associa urn determinado ponto da tela 

au namero da cor ao qual esta corresponde. Vamos utilizar 

t".'iLa instru^Sfo no Ultimo exemplo da seca*o anterior e veri-fi- 
i ftr a resul tado. 



>TEXT 

>NEW 

>10 HOME 

>20 GR 

>30 COLOR = 6 

>40 HLIN 

>50 PRINT SCRN 

>60 PRINT SCRN 

>70 END 



,39 AT 20 

(20,20) 
(8,7) 



No caso do programa acima, apos a ordem RUN, alem do 
I r d^ado da linha, a tela apresentai-a os ndmeros 6 e 0, que 
wittn correspondentes a cor cyan e preta (ver tabela X. 1) 
r •■'■":;, pect ivamente, uma vez que o panto (20,20) da tela foi 
■ ii'linido coma verde e o (B,7) coma branco. 
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Apos o comando TEXT, procure incluir a instru^ato 
INVERSE na linha 15 do programa acima e veri-ficar os resul- 
tados. 



X.5 TRACADOS DE ALTA RESOLUCAO 

Alta ResolucSco re-fere-se a tra^ados com mais detalhes, 
e melhor defini^Ko. A capacidade de alta resolu^So no TK- 
2000 COLOR consiste na possibi 1 idade da de-fini^o de 53.760 
pontes, isto e, a tela ser&o -formada por 53.760 pantos. 

Na baixa resaluca"a, usa-se o metodo de blocos, isto &, 
em cada coordenada de-finida e apresentado uin bloco, enquan- 
to em alta resoluc&o, usa-se o m&todo de pontes. 



X.5.1. HCOLOR 

HCOLOR e usada no modo alta resolute, exatamente da 
•forma de COLOR no modo de baixa resoluclfo (ver seca"o X.l) 



X.5. 2. HPLOT,. HSR e TEXT 

De -Forma semelhante a PLOT, HPLOT executa o tracado em 
alta resolufcto, porfem com bem mais pontos de coordenadas. A 
figura abaixo indica as coordenadas da tela em modo normal n 
em alta resolu^Sfo. 





278 
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alta resoIufSo 



A instru^a-o HGR permite que o TK-2000 COLOR entre nu 
modo grafico de alta resolu^So. Para voltar ao modo text 
deve— se digital o comando TEXT. 

Seguem exemplos do uso das instru^Ses HCOLOR, HPLOT 1 
HGR, bem como as -figuras indicando os resul tados dots 
programas, 

E>:emplo 1 ide-fini^Sa de quatro pontos, urn em cada canto 
da tela. 
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TEXT 




NEW 




10 HGR 




20 HOME 




30 HCDLOR 


= 5 


40 HPLOT 


277, 1 


50 HPLDT 


1,1 


60 HPLOT 


1, 158 


70 HPLOT 


277, 158 


80 END 





(U) 



(1,158) 



— (277 J) 



>l 



r (277, 158) 



Fig.X.4 



os pantos apresentados s&o 



quase 



Note que 
impercepti vei s. 
Digite agora o comando TEXT e siga para o proximo exemplo: 

Exemplo 2: tracada de Lima reta horizontal no 1 ado 
superior da tela. 



>NEW 
>10 H6R 

>20 HOME 

>30 HCOLOR ■ 5 

>40 FOR I = 1 TO 279 

>50 HPLOT I , 1 

>60 NEXT I 

>70 END 



(1,1) 




(279,1) 



>■ 



Fig . X . 5 



Exemplo 3 : e executada uma linha vertical pr&xima ao 
lado esquerdo da tela (digite a ordem TEXT 
antes de inici3k-lo. 

>TEXT 

>NEW 
>10 HGR 

>20 HOME 

>30 HCOLOR m 5 

>40 FOR I m 1 TO 191 

>50 HPLOT 1 , I 

>60 NEXT I 

>70 END 
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Fi g . K • 6 



{1,190 



H 




Exemplo 4: o programs abaixo desenha um retSngulo de 

lados paralelos aas limites da tela. Neste 
programa, bem como na respect! va -figura s&o 
■feitas algumas observances. 

>TEXT 

>NEW 

>10 HGR : HCOLDR = 3 

>20 FDR I = 1 TO 2 78 

>30 HPLDT I , 1 

>40 NEXT I 

>50 FOR 1= 1 TO 190 

>60 HPLOT 278, I 

>70 NEXT I 

>80 FOR I = 278 TO 1 STEP-1 

>90 HPLOT 1 , 1 90 

>100 NEXT I 

>U0 FOR I m 190 TO 1 STEP -1 

>120 HPLOT 1 , I 

>130 NEXT I 

>140 END 



CI) lada superior 



(2) lado direito 



(3) lado inferior 



<4) lado esquerdo 



Fig. X.7 




E>:emplo 5: 



se os valores assinalados excederem os 
limites da tela, o TK-2000 COLOR emitira 
uma mensagem de erro: 



>TEXT 

>NEW 

>10 H6R : HCOLOR m 3 

>20 HOME 

>30 FOR I = TO 300 

>40 HPLOT 1,0 
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>50 NEXT I 
>60 END 

Ap6s digitar a ordero RUN, surgira na tela : 

>RUN 

7VAL0R ILEGAL #ERRG EM 40 

>- 

Isto porque o valor de I atingiu 280 e o max i mo valor 
aqeito pels instrucSo HPLOT (maxima coordenada horizontal) e 
279. 

Exemplo 6: tente, voc£ mesmo prever o resultado do 
pragrama a seguir! 

>TEXT 

>NEW 

>10 H6R 

>20 HOME 

>30 HCDLDR = 5 

>40 FOR I m 30 TO 110 

>45 FOR J = 125 TO 155 

>50 HPLOT J , I 

>53 NEXT J 

>60 NEXT I 

>70 END 



X.5.3. HPLOT XI, Yl TO X2,Y2 

Esta & a instruf&o mais pratica para o tracado de 
retas, Ela fas com que sej a feita Lima reta entre os pontos 
de coordenadas X P Y e X , Y . For exemplo, pode-se tracar 
uma diagonal na tela conforme (nostra o pragrama: 

>TEXT 
>NEW 
>10 HBR 

>20 HCOLOR =2 

>30 HPLOT 1,1 TO 279,150 

>40 END 

Note que, atraves de uma &ni ca instruca*o pode-se tracar 
varias retas. Desta forma, o e^emplo do tracado de urn ret&n- 
gulo com lados paralelos aos limites da tela, apresentado 
no sub-Item anterior, pode tambem Ce de maneira mais rapida) 
ser obtido atraves do programs: 

>TEXT 

>NEW 

>10 HGR 

>20 COLOR = 3 

>30 HPLOT 1,1 TO 25B,1 TO 258,157 TO 1,157 TO 1,1 

>40 END 
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Observe agora as -figuras -formadas pelos seguintes 
programas. 



>TEXT 

>NEW 

>10 HGR 

>20 HCOLOR = 3 

>30 FOR I « TO 60 STEP 10 

>40 HPLOT 1,1 TO 259-1,1 

>50 NEXT I 

>60 END 



*- ■ 



>T£XT 

>NEW 

>10 HGR 

>20 HCOLOR « 2 

>30 FDR I = TO 60 STEP 10 

>40 HPLOT 1,1 TO 258-1,1 TO 25B-I, 

159-1 TO I, 159-1 TO I, I 
>50 NEXT I 
>60 END 



>TEXT 

>NEW 

>10 HOR 

>20 HCOLOR = 5 

>30 FOR I = TO 150 STEP 5 

>40 HPLOT 1,1 TO 258-1,1 TO 258-1, 

159-1 TO I, 159-1 TO I, I 
>50 NEXT I 
>60 END 

X.5.4. HGR2 

Como se pode verificar, no modo de alta resolute 
gra-fica acionado par HGR, as linhas -finals da tela 
permanecem no modo ttexto e o campo de alta resoluc^o permits 
a defini^eia de 280 Ipor 160 pantos. HGR2 1 32 com que o modo 
de alta resalu^^o grA-fica passe a preenchsr a tela inteira, 
permitindo a de-fini?a*o de 280 por 192 pontos na tela. 
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FApA SEU RESUMO 

1. A instrucSo: 

COLOR = 

permits a definicSo da cor correspondents ao numera X, onde 
X varia de a 7. 



2. Sendo X a coordenada e Y a coordenada . 

instructor 

X,Y de-fine um ponto neste local da tela. 

3. A instruc&o que permits o uso do modo grafico e . 



4. Para se obter o namero correspondents a cor do ponto 
<X,Y) da tela usa-se a instrucSo 

(X, Y) 

5. Tracos horizontals e verticals podem ser obtidos atrav^s 
de instrutfles Cinicas, que sSo respect i vamente 

X , Y TO X 

... X , Y TO Y 

6. No tra^ado normal de graficos, a tela & dividida nas 
coordenadas verticals a ....... e nas horizontals de a 

, enquanto em alta resoluca*o as coordenadas 

verticals v^o de a e as horizontals de a 

* 

7. HCOLOR e Lima instruca'o usada no modo de alta resolut^o da 
mesma forma que no modo de bai:-ia resoluca'o. 

B. De forma semelhahte a instru^o , executa 

tracados em alta resoluc&o. 

9. A instructor 

X ,Y X ,Y ...X ,Y 

executa o tracado a partir das coordenadas (X , Y ) para (X 
,Y ) e finalmente ate as coordenadas (X , Y ) 

10. As instruccies que permitem o uso do modo grafico de alta 
resol u^eto s<=to ou 

11. Para se vol tar do modo gra-fico ou do modo grA-fico de 
alta resolucSo para o modo normal (ou modo texto) , usa-se o 
comando 

12. modo de alta resoluca'o grafica, quando acionado por 

permite a def initio de 280 >; 1&0 pantos, e atraves de 

preenche toda a tela, possibi li tando a definicSo de 

280 x 192 pontos. 

» 

respostas: 

l.Xf 2. horizontal, vertical, PLOT; 3. 6R; 4.SCRN; 5.HLIN, 

VLIN; 6. 47, 39, 191, 279; 7. COLOR 8. PLOT, HPLOT; 

9. HPLOT, TO, TO; 10.HGR, HGR2; 11. TEXT; 12. HGR, HGR2 
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CAPITULO XI. LIDANDO COM DESVIOS 

Sempre que, num programa, a sequ£ncia numerica de 
execucSa das linhas nSo e obedecida, diz-se que ocorreu urn 
"desvio" . 

Uma instruca"o ja apresentada que executa desvios e GOTO. 



XI. 1. Desvios Condicionais. 

Entende-se por desvios condicionais, desvios on, de modo 
geral , operates do programa que so ocarrem em detsrminadas 
si t uaffies • 

Seguem as instrucfres que provacam este tipo de "desvio". 



XI. 1.1. IF. 



GOTO 



Esta instVu^a'a -faz com que, "se" (i-F) a condiccto apre- 
sentada apos IF for verdadeira, o programa seja desviado 
para a linha indicada apis GOTO? caso a conditio apos IF na'o 
seja! verdadeira, o programa prassegue normal merits na 
pr&xima linha: 

programa seguinte mostra o numero de vezes que cada 
face de urn dado se apresenta quando atirado 600 vezes. 



>NEW 

>10 FOR I = 1 TO 600 

>20 BY. m RND(l) * 6 + 1 

>30 IF B7.= l GOTO 100 

>m IF B7.=2 GOTO 110 

>50 IF B"/.=3 GOTO 120 

>60 IF B7.=4 GOTO 130 

>70 IF B"/.=5 GOTO 140 

>B0 A (6) « AC6) +1 

>?0 GOTO 200 

>100 AC1) = A<1> 

>110 A<2> « AC2) 

>120 ACS) = ACS) 

>130 A<4> m AC4) 

>140 AC5) = AC5) 

>200 NEXT I 

>210 FOR I ■ 1 T 

>220 PRINT "AC; I . 

>230 NEXT I 

>240 END 



+ 1 


m 
■ 


GOTO 


200 


+ 1 


■ 


GOTO 


200 


+ 1 


m 


GOTO 


200 


+ 1 


2 


GOTO 


200 


+ 1 


m 


GOTO 


200 


6 








>") 


= 


"J A (I) 





Antes de rodarmos o programa, vamos supor a primeiro 
cicla de execuf&a, entre as linhas 10 a 200. 



10 FOR I = 1 TO 600 (sendo este o 1 ciclo do programa, I e 
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associado a 1) 



20 BV. m RND<1) * 6 + 1 



30 



IF B'/.= l GOTO 100 <A 



(Suponha que RND(l) tenha sido 

.23457, temos enteto : 0.23457 x 

6 = 1.40742 

1.410742 + 1 = 2.40742, B*/. = 

2.40742 B'/.=2) 

a-firma^So apos IF e -falsa, logo o 



programa na"a sofre desvio) 



40 IF B7.-2 GOTO 110 



Hi 



(A af irfnascfa ap6s IF e 
(8X=2) , logo o programa 
para a linha indicada 
(110), ocorrendo ent&o o 



verdadeira 
e desviado 

ap6s GOTO 
1 ci clo) . 



A<2) = A<2) +1 GOTO 200 



(Inicialmente coma A(2> n^o 
estava associado a nenhum 
valor ele corresponderia a 0. 
Ap&s a execu^Sto desta instru- 
fSo: A (2) =0+i du seja 
A (2) = 1. Ocorre entlta o 
segundo desvio Ceste e 
incondicional ) quando 

o programa e desviado para a 
linha 200) . 



100 NEXT 



FIG. XI. 1 



<E acrescentada uma unidade ao valor de I e 
programa e desviado para a linha 20). 



Apos a ordem de execu^^o do programa, aguarde algum 
tempo (cerca de 30 s ) para que a resposta seja fornecida. 
Teremos ent&o urn resultado do tipo: 



>RUN 






AU) 


ES 


S7 


A(2) 


= 


96 


A (3) 


= 


102 


A(4) 


a 


91 


A(5) 


= 


X «hnH / 


AC6) 


H 
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XI 1.2. IF ...... THEN 

uso do IF THEN e semelhante a IF.... GOTO, no 

caso da afirmaca'a ap6s IF ser verdadeira, podetnos desviar o 
programa para uma determinada linha (exatamente da mesma 
forma que com IF..... GOTO) ou executarmos uma determinada 
opera^Sto. Desta forma, o programa apresentado no sub-item 
anterior pode tambem ser feito da seguinte maneira: 



>NEW 
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>10 

>20 
>30 
>40 
>50 
>60 
>70 
>80 
>90 
>100 

>110 

M20 
>130 



FDR I - 1 TO 600 
BX m RND(l) * 6 + 



1 



IF BX m 1 THEN Ad) = Ad) + 
1"F B7. = 2 THEN A (2) - A (2) + 
IF BV. = 3 THEN A (3) m AC3) + 
IF BX m 4 THEN A (4) « A (4) + 
IF BX = 5 THEN A (5) = ACS) + 
IF BX = 6 THEN A (6) = A (6) + 
NEXT I 

FOR I = 1 TO 6 

PRTNT "A ("II j"> = "SAID 

NEXT I 

END 



Aguarde 
resposta. 



alguns segundos para 



a 



apresentaca"o da 



XI. 1.3. ON. 



GOTO 



A instruslfo ON GOTO age de forma urn pouco 

diferente das anteriqres, Sua forma geral e; 

ON <n£imero inteiro> GOTO 1 parStmetro, 2 parametro, 3 pa~ 
r&metro, 

onde cada p&r&metro corresponds a urn n&mero de linha do 
programs. Desta forma, se o ntimero intei ra apos ON, for 1 o 
programa sera desviado para a linha de programa 
correspondents ao 1 parametro, se for 2, o programa sera 
desviado para o ndmero de linha correspondents ao 2o parSme- 
tro e assim por diante. 

programa apresentado nos sub-itens anteriores, pode 

ser desenvolvido atraves da instruca*o ON SOTO, conforms 

se ve abaixa. 



mm 

>10 FOR I - 1 TO 600 

>20 BX • RND d > * 6 + 1 

>30 ON BX GOTO 100,110,120,130,140,150 



>im 


Ad) = 


Ad) + 


1 


: GOTO 200 


>110 


A(2) - 


A<2) + 


1 


: GOTO 200 


>120 


A(3) * 


A(3) + 


1 


I GOTO 200 


>130 


A(4) ■ 


A(4) + 


1 


• GOTO 200 


>140 


A(5) * 


A(5> + 


1 


GOTO 200 


>150 


A(6) = 


A<6) + 


1 




>200 


NEXT I 








>210 


FOR I « 


= 1 TO £ 


> 




>220 


PRINT ' 


'AC'Sli ' 


) = 


= " ;A(i) 


>230 


NEXT I 








>240 


END 
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XI. 1. 4. IF. 



.THEN.... .GOTO 



Esta instruc&o combina a utilizacSo de IF....THEN © 
IF..... GOTO, coma demonstra o programa a seguir. 



>NEW 

>10 rem DIVISAQ DE NUMERO INTEIRO FOR DO 1 9 

>20 HOME 

>30 REM OBTENCAO DO NUMERO 

>40 INPUT "QUAL £ D NUMERO ? " ; A 

>45 REM VERIFICACAO E D I VI SAO 

>50 B = INT (A) 

>60 IF A-B THEN C « A/2. : GOTO 100 

>70 PRINT "0 NUMERO ";A;" NAO E INTEIRO" 

>80 GOTO 110 

>100 PRINT "A METADE DE ";AJ" E *|C 

>U0 PRINT: PRINT 

>120 PRINT "DESEJANDO DIVIDIR MAIS NUMEROS DIGITE- 

S" 

>130 PRINT "CASO CONTRARIO DIGITE OUTRA TECLA" 

>140 GET D$ 

>150 PRINT: PRINT 

>160 IF D* = J, S" THEN PRINT : GOTO 40 

>1'70 PRINT: PRINT: PRINT "F" , " I " , "M" 

M80 END 

Como se pode ver, o programa utilizou duas instructress 
condicianais, Lima para verificar se o numero digitado e ou 
na"o inteiro e outra para saber se e ou na"o desejado que o 
programa prossiga. Note que em cada caso, de acordo com o 
dado introduzido nas instruco'es condicionais, o programa to- 
ma Lima atitude diferente. 



A tela da -fig. XI. 3 seria apre.sentada se, ap6s a ordero 
RUN, sejam digitados : o numero 3.5, a letra S, o numero 8 e 
a letra N. 



Fig. XI. 3 



\ 



QUAL E NUMERO ? 3. 5 

NUMERO 3.5 NAO E INTEIRO 

DESEJANDO DIVIDIR MAIS NUMEROS DIGITE-S 
CASO CONTRARIO DIGITE QUTRA TECLA 

QUAL E NUMERO ? 8 
A METADE DE 8 E 4 

DESEJANDO DIVIDIR MAIS NUMEROS DIGITE-S 
CASO CONTRARIO DIGITE OUTRA TECLA 



I 



M 
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XI. 2. SUB-ROT IN AS 

uso de subrotinas £ um artificio bastante usado em 
programaca'o. 

Entende-se par sub-ratina, urn programa secundaria, que 
j 11=) pade usar diversas vezes dentro de um programa maior. Por 
wnEdiplD, um programa para resolucSo de problemas de f I si ca 
pode utilizar uma sub-rotina de conversolo de unidades, 
ttssim, sempre que -for necessario converter uma deter mi nada 
unidade (centlmetros para metro, tonelada para quilo, hora 
para segundo, etc..) basta que se chame a sub-rotina de 
i unverseio de unidades. 

Al&m de facilitar o trabalho do programador que nKo 
precisara escrever repetidas vezes um mesmo trecho do pro- 
grama, as subrotinas economizam espaco na mem&ria do coropu- 
I ftdHir. 



XI. 2.1. GOSUB e RETURN 

GOSUB e a instruca'o que desvia o programa para a sub- 
r phina desejada. Ao final da execu^Ka da sub-rotina, a 
I itHtruc^lo RETURN fez com que o programa volte para sua 
'ti.*i:|uencia normal, uma instrucSo apos GOSUB. Observe o 
r'Mempl o: 

ATENfAO: Ncfo confundir a instruca'o RETURN com a tecla 
RETURN 

Exemplo: o programa a seguir pode ser subdividido em duas 
partes: o programa principal e a sub-rotina. As 
linhas de n&mero 10 e 70 constituem o programa 
principal e as linhas 100 a 150 constituem a 
sub-rotina. A instrucKo GOSUB esta no programa 
principal, enquanto o comando RETURN estli ns. 
sub-rotina. 



>NEW 


■** 






>10 x=5 : Y=i 






- 


>20 GOSUB 100 








>30 X=7 : Y=3 








>40 GOSUB 100 




> 


programa principal 


>50 X=4 : Y=5 






. 


>60 GOSUB 100 








>70 END 


> 






>100 REM SUBROTINA 






M10 FOR 1 = 1 


TO X 






>120 PRINT Y ; 








>130 NEXT I 




> 


sub-rotina 


>140 PRINT 






>150 RETURN 


^ 







Ap&s a ordem RUN teremos: 

>RUN 
11111 

'—^ O -wJ* m *J w "_ J w 

5555 
Exami nemos agora a ssquincia de execu£a*o do programa: 

a. A linha 10 indica X=5 e Y=l 

b. Na linha 20 GOSUB desvia para a sub-rotina da linha 
100 

c. Executa a sub-rotina e, na linha 150 RETURN -faz com 
que o programa volte para a linha 30, que atribui a 
variavel X o valor 7 e a Y o valor 8. 

d. As operates citadas s^fo enta"o repetidas para X=7, 
Y=3 e X=4 s Y=5 ap&s o que o programa e -final izado. 

XI. 2. 2. Sub-rotina dentro de uma sub-rotina 

As vezes h necessario ter— se uma segnnda sub-rotina 
dentro de uma sub-rotina. Execute o programa: 

>NEW 

>10 REM PROGRAMA PRINCIPAL 

>20 DIM At 100) 

>30 GOSUB 2000 

>40 PRINT "FIM" 

>50 END 

>2000 REM PR I ME I RO NIVEL DE SUB-ROTINA 

>2010 FOR I = 1 TO 5 

>2020 A(l) = 5 * I 

>2030 GOSUB 3000 

>2040 NEXT I 

>2050 RETURN 

>3000 REM SEGUNDO NIVEL DE SUB-ROTINA 

>3010 B(I) = A<I) * 2 * 1 

>3020 PRINT "A(";l;") « " S A < I ) , "B ( " ; I? " ) ■ " ; B ( I ) 

>3030 RETURN 

Apos o comando RUN teremos : 

>RUN 

A(l> = 5 BU) ■ 11 

A(2) = 10 B(2) = 21 

A(3) = 15 B(3) = 31 

A<4> = 20 BC4) = 41 

A<5) = 25 B(5) = 51 

FIM 
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A 1 « i « ■ J i 



ON GOSUB 



uso de ON GOSUB e bastante semelhante ao uso de 

ON GOTD (ver item XI. 1.3.) porem, ON GOSUB ao in- 

ves de desvi ar o pragrama para determinadas linhas, desvia-a 
para determinada sub-rotinas. Eimportante que n&o se esque- 
£a de final izar cada Lima das sub-rot inas com a instruc^a'o 
RETURN. Verifique os dois ejiemplos a seguir; a primeiro 
utilizando a instru^Sto DM„....GOTD e a segundo ON. . . . . GDSUB. 

Enemplo 1 



>NEW 








>10 FOR I 


■ 1 TO 100 




>20 1 


37. = RND(l) * 3 + 


1 


>30 ON B7. 


GOTO 100,200 


, 300 


>xm 


A(l) 


= A U) + 1 




>ii0 


GOTO 


400 




>200 


A(2> 


= AC2) + 1 




>210 


GOTO 


400 




>300 


AC3) 


■ A(3) + 1 




>400 


NEXT 


I 




>410 


FOR ] 


: = 1 TO 3 




>420 


PRINT "AC; I; ") m 


";A(D 


>430 


NEXT 


I 




>440 


END 







Exemplo 



>NEW 

>10 FOR I = 1 TO 100 

>20 BY. n RNDC1) * 3 + 1 

>30 ON BV. GOSUB 100,200,300 

>40 NEXT I 

>60 FOR I - 1 TO 3 

>70 PRINT "A("; I; "> = " ; A < I ) 

>S0 NEXT I 

>90 END 

>100 A(l) = A<15 + 1 

>120 RETURN 

>200 A (2) » A<2) +1 

>220 RETURN 

>300 A<3) ■ A (3) +1 

>320 RETURN 



resultado dos programas e do ti pa: 



>RUN 

AU) 

A(2) 

A<3) 



27 

35 
38 



1=1,2 on 
para 1=2, 



No programa apresentado, determinamos random! camente 



por meio de 
GOSUB 200 j! 



RND. Se 1=1, entSo GOSUB sera 100; 
e 1=3, para GOSUB 300. Executamos urn 
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por urn 100 vg:e?s, 
nCtmeros de t, 2 e 3. 



e entcto apresentamas a estatlstica dos 



Xr.2.4. ONERR . . 0QTO 

Se ocorrer urn erro durante a execu$:3o do prograuia, o 
computador i nterromperA a sua axecufao e apresentari uma 
mensagem de erro. Par exsmplol 



>NEW 






>10 


HOME 






>20 


FOR I 


= 


TO 


>30 


PRINT 


I. 


5/ I 


>40 


NEXT I 
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Quando o computador iniciar a execn^Ko do program*, ele 
o interrompera imediatamente, porque sendo 1=0, o computador 
na*o tera possibi 1 idade de executar 5/0. 

>RUN 



?D I VI SAO POR ZERO #ERRO EM 30 



Na linguagem BASIC, a instruca'o ONERR..... SOTO e a 

abreviafSo de "ON ERROR SOTO" !em caso de erro va para..). 
Quando ocorre urn erro, ONERR. ..... GOTO pode evitar que a 

execu^o do prograuia se j a i nterrampida , ocasionando urn des- 
vio para uma rotina de tratamento adequado de erro, esta 
rotina deverS necessari amente final izar com o comando 
RESUME, que retorna o processamento ao ponto onde surgiu o 
erro. Dbserve o exemplo: 



>NEW 

>10 HOME 

>20 ONERR SOTO 100 

>30 INPUT "DIGITE NUMERO ' 

>40 Y = 1 / X 

>50 PRINT "X = "5X,"Y = " j Y 

>60 GOTO 30 

>100 PRINT "NAO VALE ZERO" 

>110 RESUME 



IX 



Se apos darmos a ordem RUN, digitarmos as n&meros 56, 
12 e 0, teremos uma tela semelhante a -figura XI. 4; 



FIG. XI. 4. 




0178571429 



TE NUMERO 56 
=56 Y = 

DIGITE NUMERO 12 
X =12 Y = .0833333333 

DIGITE NUMERO 
NAO VALE ZERO 
DIGITE NUMERO | 
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Quando um pragrama acaba se tornando complexo, muitas 
vezes existe a possi bi 1 i dade de varios erros diferentes 
terem a mesma chance de ocorrer. Assim sendo podemos, 
atraves da leitura de PEEK<222), determinar d cddigo do erro 
cometido no programa. A tabela que apresenta os codigos de 
todos db erros esta contida no APENDICE B. Assim sendo se na 
linha 105 tivessemos digitado: 



>110 A= PEEK (222) : PRINT A 

o programa, alem do resultado acima, na ocasia"o do erro el a 
tambem apresentaria o namero 134 que corresponds ■ ao erro 
DIVI5A0 POR ZERD. 

A operacjSo no modo DNERR deve ser indicada normal mente 
no inicio do programa, e sempre que acontecer urn erro a 
rotina adequada sera chamada. Esta rotina deve ser 
completada com o comando RESUME. Para desati var o modo 
ONERR deve ser executado o comando POKE 216,0. 

XI. 2. 5. POP 

Uma instruct© POP tern e-feito semelhante a RETURN, porem 
na"o executa o retorno ao programa principal. proximo 
RETURN encontrado, ao inves de retornar ao programa uma 
instru^a'a ap&s o dltimo GOSUB, i r=» pular para uma instruflfo 
ap6s o penultimo GOSUB. 

No exemplo abaixo, inicialmente a instrus&o POP nSo e 
usada. 



>NEW 






>10 ! 


^RINT " 


A" 


>20 1 


30SLIB 100 


>30 1 


-*RINT " 


E" 


>40 1 


£ND 




>tm 


PR I NT 


"B" 


M10 


GOSUB 


200 


>120 


PRINT 


"D" 


>130 


RETURN 




>200 


PRINT 


"C" 


>210 


RETURN 





Ap&s RUN, teremos a apresenta^a'a da sequencia A, B, C, 
D e E (uma letra em cada linha). A ordem de execu^o das 
linhas de comando e! 10 # 20 # 100 # 110 # 200 # 210 # 120 
# 130 # 30 # 40. 

Incluindo a linha 

>205 POP 

a letra D na*o mais sera apresentada. A nova ordem de 
ei<ecuc3o das linhas de comando passa a ser: 

10 # 20 # 100 # 110 # 200 # 205 # 210 # 30 # 40. 
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Coma pademas abservar, apos a inclLisSo de POP na linha 
205, a instru§ra'o RETURN da linha 210 ao inves de desviar d 
programa para a linha 120, desviou-o para a linha 30, ou 
seja, o POP anula a &ltima situa^a de retorno e a anterior 
passa a const ar. 
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FAfA O SEU RESUMO 

1. Guando a sequ§ncia num&rica da enecup9o de urn programa 
na"o e obedecida diz-se que ocorreu urn 

2. A instrufSo 

<....> <condii?ao> <GQTO> <....,> 

■fas com que, se a condicSo indicada -for verdadeira, a 
execuca'o do programa sej a desviada para a linha de numero 
xyz. Caso a e on d if So seja falsa, o programa prossegue na 

a n • p p 1 T 1 SJ Cr I LI ^* O w • * 

3. Na instrucSo: 

< > <condica"a> <THEN> <operaca*o> 

a operaccto indicada ocorrera se a condic<=to -for 

4. Se no item anterior, em vez de uma operac&a -for indicada 
urn nftmero de linha do programa apds THEN, esta instrucSto 
passara a ser identica a <.,....> <condi£e<a> <GOTD> < - 

5. Desejando-se desviar o programa para diferentes linhas, 
de acordo com o valor inteiro assocUdo a B°A, utiliza-se a 
i nstrucSo: 

< > <B7.> <........> <aaaL> < , > <bbb > < , > <tzcc > 

onde aaa, bbb, ccc equivalent a nameros de linhas do 
programa. 

6„ Na questcCo anterior, o programa sera desviada para a 
linha bbb quando o valor de BV. -for „ . 

7. A instru^cto: 

<.....> <condi^ao> <THEN> <opera^c(o> <GOTO> <....-....-..,.> 
combina as acdes de ....... GOTO e ....... THEN. 

8. Uma sub-rotina s urn programa , que se pode 

utilizar diversas vezes dentro de um programa principal, 

9. desvio de um programa para uma sub-rotina iniciada na 
linha xyz e feito atraves da instrufSo: 

xyz 

10. Suponha que a instru^a'a de desvio para uma sub-rotina 

( > se localize na linha n do programa. A dltima 

instru^So da sub-rotina deve ser, necessar i amente „ 

apos a qual o programa voltara a ser executado normalmente, 
a partir da linha ......... + ....... 

11. Pode haver di versos nlveis de sub-rotinas dentro de um 
programa, ou sej a, dentro de uma sub-rotina pode haver uma 
instrug:a"a que desvia a execuf&o do programa para uma nova 
sub-rotina. Por&m, nunca esque?a: cada uma das sub-rotinas 
devem ser sempre finalizada pel a instrufSlo 
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12. Pode— 5e desviar ura programa para diversas sub-rotinas, 
dependendo do valor da var ieivel inteira B7. atrav^s da 
i nstru^aa: 

< > <B7.X > <aaa><bbb Xccc > 

onde aaa, bbb e ccc correspondem as linhas de. inlcio das 
sub-roti nas 

13. Ma pergunta anterior, ?se BY. -for igual a 3, o programa 
sera desviada para a sub-rot in a que se inicia na linha 



$4# Caso ocorra urn erra num programa, ao Inves dest© ser 
int.errompido, els pad© ser desviada para a linha ;-;yz atrav&s 
da instru^ato <„.„.... > <GCTO> <XYZ> 

15. A instrusa'o . „ . „ . faz 00,1, que a praxima instrusr&o RETURN 
desvie o programa para a ordem seguinte a penal ti ma instru- 
C&O GOSUB* 



respostas: 

l.desvio ; 2. IF, Hy? 1 proximal! 3. IF, verdadei ra; 4, IF, 
namero-de-linha; 5. ON, GOTO; 6 ,. 2; 7„ IF, namero de linha, 
IF, IF, 8. secundario; 9. GOSUB! 10. GOSUB, RETURN, n, 1; 
11. RETURN; 12. ON, GOSUB; 13. ccc \ 14- ONERR. ; 15 FOP ' 
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CAPITULD XII- FUNCOES MATEMATICAS 

Alem das operates basicas tais como: + , -, -*, /, * 

podemas utilisar ■fun^o'es matematicas. Neste capltulo 
estudaremos as funffies existentes na linguagem BASIC do TK~ 
2000 COLOR. Algumas -fun^&es ja apresentadas sa*o : INT(X), 
RIMD(l) e SQR(X) . 



XII. 1. FUNCOES TRIGONQMETRICAS 

SIN(X), COS(X> e TAN(X) s3o as principals funcdes tri 
gonometricas. 



XII. 1.1 Fun^So seno-SIN(X) 

Na linguagem BASIC utilizada pelo TK-2000 COLOR, as 
operacBes com as funcftes trigonometri cas sKo baseadas na 
unidade radiano. Isto e, o valor entre parinteses deve ser 
expresso em radianos e nSo em gratis. Lembre-se que 360 
corresponds aproxi madamente a 6.28 radianos e portanto, cada 
radiano aproxi madamente vale 57.324804 grans. 

Agora digite o seguinte programa que -forma uma tabela 
do seno de X. Usamos primeiro a linha numero 30 para obter o 
■fator de convers^o de gratis em radiano, e enta"o na linha 50 
os graus s3to convertidos em radiano <I/R>. A convers"ao e 
■feita pars, cada 15 graus. 



>NEW 

>10 PRINT "GRAUS",' TAB < 8) ; "RADIANOS" ! TAB<24) 5 "SEN<X> 

PRINT 

R=360 / 

FOR I ■ 

Y = SIN 

PRINT IS 

NEXT I 

END 



>20 
>30 
>40 
>50 
>60 
>70 
>80 



6.28 
TD 
CI / 



350 
R> 



STEP 30 



TAB(B)5I/RJ TAB(24)JY 



Apis a ordem RUN, teremos a seguinte tabela: 



GRAUS 



30 

60 

90 

120 

150 

180 

210 

240 

270 

300 

330 

360 



RADIANOS 



. 523333333 

1.04666667 

1.57 

2.09333333 

2.61666667 

3. 14 

3.66333333 

4„ 18666667 

4.71 

5.75666667 

6 > j^B 



SEN(X) 



.499770103 

. 865759839 

. 999999683 

.8665558 

.501148958 

1.59265337E-03 

-.498389979 

-.864961682 

-.999997146 

-.867349563 

-.502526543 

-3. 1S53027E-03 
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XII. 1.2. Fun^So cosseno CDS<X) 

programa seguinte executa uma tabela do cosseno de X, 
de forma semelhante a executada no sub-item anterior. 

>NEW 

>10 PRINT "GRAUS";TAB(8) ? "RADIAN0S";TABC24) 5 "COS(X) " 

>20 PRINT 

>30 R=360 Z6.28 

>40 FDR I = TO 350 STEP 30 

>50 Y = COS (I / R) 

>60 print I; tab(8);i/R; tab(24>;y 

>70 NEXT I 
>S0 END 

Teremos ent&o: 



BRAUS 



30 

60 

90 

120 

150 

180 

210 

240 

270 

300 

330 

360 



RADIANOS 


r' — o —!• O ■—' O O O 

I . 04666667 

1.57 

2.09333333 

win 6166666/ 
3. 14 

■Sp v y ^p ™r *^ ^BF ^t t" 
■J 1 » OOOOOOJO 

4. 18666667 
4.71 

CT ""Ti "T "T *"!£ ~*X T£ ™T^ TJJ" 

W H «h» W V L «? W W W ""•' 

5.75666667 
6.28 



COS(X) 

1 

.866 158094 

.500459689 

7.96326206E-04 

-.4990802 

-.865361035 

-.999998732 

-.866952956 

-.501837909 

-2.28897S06E-03 

. 497699443 

.864561781 

. 999994927 



XII. 1.3. Funcao Tangente- TAN(X) 

programa abaixo calcula os valores de tangente de X 
de maneira semelhante ao COS(X) e SIN(X). 

>NEW 

>10 PRINT "GRAUS" ; TAB (8) ; "RADIANOS"; TAB (24) ? "TAN (X) 

>20 PRINT 

>30 R = 360 / 6.28 

>40 FOR I = 1 TO 360 STEP 30 

>50 Y = TAN (I/R) 

>60 PRINT I5TABCS) jl I/R;TAB<24) ;Y 

>70 NEXT I 

>80 END 



Ap6s digitar RUN e apresentado: 
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GRAUS 

i 

•30 



90 

120 

150 

180 

210 

240 

270 

300 

330 

360 



RADIANDS 

. 523333333 

1 . 04666667 

1.57 

2. 09333333 

2.61666667 

3. 14 

3. 66333333 

4. 18666667 

4.71 

5.23333333 

5.75666667 

6 . 28 



TAN ( X ) 


. 5769964 

1 . 72992922 

1255.76523 

-1.73630571 

-. 579121243 

-1.59265539E- 

. 574875459 

1.72353777 

418.587575 

-1.74271757 

-.581250008 

-3. 18531896-* 
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XII.2.TRACAD0S GRAF I COS DE FUNCDES 

XI I. 2.1. Diagramas Simples 

TK-2000 COLOR e capaz tanto de calcular valores 
num&ricos como tie tra^ar gra-ficos de -funcbes. No tra^ado de 
funcfles tr igonometr icas., temas que girar a eixa das cDorde- 
nadas em 90 no sentido horario, con-forme a figura XII. 1 





a) sentido normal de 
execu^ao do gra-Fico 



Fig. XII. 1 



b) rota^So do eiKo do gra- 
fico em 90 no sentido 
horario, na tela do TK-2000 
COLOR 



namero de caracteres e limitado pel a tela. 

Sabemas que o valor da -funtfSo seno varia entre +1 e -1 . 
A tela do TK-2000 COLOR tern somente 40 caracteres para cada 
linha, de -forma que devemos usar 20 como ponto medio. Fa^a o 
programa a seguir. ponto chave deste programa se situa nas 
linhas 20 e 30. 

>NEW 

>10 FOR I m TO 360 STEP 20 

>20 Y » SIN (1 757.299578) 

>30 K7. m Y * 19 + 20 

>40 PRINT TAB (K7.) ; "*" 

>50 NEXT I 

>60 END 
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Na linha 20, Y e o 
valor de seno, e seus 
valores sSo entre -1 e 
+1; quarido Y © multipli- 
cado par 19, seus valores 
passam a va.ria.r entre -19 
e +19, e ai soma-se 20 a 
ele, de modo que o valor 
de Ks e obt. ido entre 1 e 
39, passando a ocupar os 
limites da tela. A linha 
30 apresenta o simbolo 
"*" em TAB(KX), assim 
obteremos o diagrama ds 
figura XII. 2. 



* 



* 



* 



* 



■fig. X 1 1 . 2 



XII. 2. 2. Grafico da Funfa"o Seno 

Depois de observar o programa do sub-Item anterior, 
compare as diferen^as com o seguinte diagrama! 

>NEW 

>10 FOR 1=0 TO 39 

>20 PRINT ". " ; 

>30 NEXT 1 

>40 PRINT 

>50 FOR I = TO 360 STEP 20 

>60 Y * SIN (1/57.29578) 

>70 K*/-= Y * 19 + 20 

>80 IF KV. >20 THEN 120 

>90 PR I NT TAB i K% );"*" ji TAB C 20 ) 5 " . " 

>100 GOTO 130 

> 1 20 PR I NT TAB ( 20 ) ; " . " | TAB ( KY. > | " ' * " 

>130 NEXT I 

>140 END 

A figura XII. 3 ilustra o resultado deste programa. 



*. 



* 



*. 



fig XII. 3 



15: 



XI I. 2, 3. Gra-fico da Funcofo Cosseno 



! 



Verifique o programa abaiwo e compare seus resultados 
com o programa apresentado no sub-Item anterior. A -figura 
KIL4 indica o resultado de sua execufao. 

OE*BERVAf AD: Be voce tiver digit ado o programa anterior, n&o 
digite NEW pois, para enecutar este programa 
basta reentrar com a linha 60 alterada. 



10 FOR I = TO 39 

■ 



>20 PRINT " "* 



■■-30 NEXT I 

>40 PRINT 

>50 FOR 1=0 TO 360 STEP 20 

>60 V = COS < 1/57-29578) 

>70 K7.= Y * 19 + 20 

>80 IF K7. >20 THEN 120 

>90 PRINT TAB CK7.) ;"#'■; TAB (20) j " . ■ 

>100 GOTO 130 

> 1 20 PR INT TAB < 20 )","." ; TAB ( KV. ) ; " * " 

>130 NEXT I 

>140 END 



a 
*■ 



* 

* 
* 

* 

* 



* 

* 



FIG. XII. 4. 

XI I. 2. 4. QUTRAS FUIMCOES 

XI I. 2. 4. a. Fun^ao Random! ca - RND(X> 

Ha tr£s tipos de funcdes randbmicas no TK-2000 COLOR: 
RND(l), RND<0) e RND<-X>. Siga o exemplo: 

>NEW 

>5 PRINT "RND(D " 

>10 FOR I = 1 TO 3 

>20 PRINT RND(l) , 

>30 NEXT I 

>40 PRINT 

>4S PRINT "RNDC0) " 



>50 FOR I = I TO 3 
>60 PRINT RND<0) , 
>70 NEXT I 
>Q0 PRINT 

>85 PRINT "R1MDC-X> " 
$$£ FOR I tap 1 TO 3 
>100 PRINT RND(-I) , 
>U0 NEXT I 
>120 END 

Apos a or clem RUN, a tela apresentara: 
>RUN 
RND ( 1 ) 

. 235586735 . 186784663 

.37278107 

mm i ) 

. 37278 1 07 . 37278 1 07 

, 37278107 

RND<-X) 

2. 199196472E-08 2. 99205567E-08 

4.4B217179E-08 

Dob resultadDs anteriores podemos observar que: 

a. RND < 1 ) fornece urn nQmero entre e 0„ 999999999 

b. RND(0) repete o n&mero -fornecido pel a instru^a RND 
anteri or 

c. Q&dzs RND<~X) seleciona um numero diferente e de valor 
bastante pequeno 



XII. 2. 4; b Funsa-o Valor Absol uto - ABS<X) 

Em matematica as ve2es i n&ce&B&ria obter-se valores 
absolutos. Para tanta usa-se a instrucSD." 

ABB ( X ) 

Ver i -f i que o programa abai>:o: 

>NEW 

>10 FOR I ■■= -10 TO 10 STEP 5 

>20 PRINT "ABSC'JIJ") ; = " | ABS ( I > 

>30 NEXT I 

>40 END 

Apos a ordem RUN teremos: 

>RUN 

ABS<-10) = if 
ABS (-5) = 5 
ABS(0) = 
ABS(5> = 5 
ABS (10) m 10 
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XI 1. 2, 4. c FuncSo Trigonometries Inverse - ATN(X) 

Al£>m das -fun^des trigonom&tricas, o TK-2000 COLOR per- 
mits o usd da -func&o inversa a tangente de X atraves da 
instrucSo : 

ATN(X) 

Observe o e:-templG e seu resultadol 

>NEW 

>10 FOR I - -10 TO 10 STEP 5 

>20 PRINT "ATNC'SlS") = " 5 ATN ( I > 

>30 NEXT I 

>40 END 

Resul tado 
>RUN 

ATN (-10) * -1.47112769 
ATN (-5) m -1.37340077 
ATN<0> = 
ATN (5) = 1.37340077 
ATN (10) M 1.47112768. 

Dutras -funcoes tr igonometri cas devem ser obtidas pelas 
■f formulas adequadas couio cansta no Apendiee A. 

XII. 2. 4. d. Reconheci mento do sinal- SBN<X) 

programa a seguir e am exemplo de SGN(X>„ Se o valor 
de X for negativo„ a computador apresenta na tela -1; se o 
valor for ele apresenta 0b se o valor -for positive* 
ap resent a 1 . 

>NEW 

>10 FOR I = -10 TO 10 STEP S 

>20 PRINT "SGNC'SI;") ■ '*J SGN ( 1 ) 

>30 NEXT I 

>40 END 

Teremos entSoi 

>RUN 

SGN (-10) ft -1 
SGN (-5) « -1 
SGN(0) = 
SGN<5> = 1 
SGN (10) ■ 1 

XII. 2. 4. e FuncSo Exponencial - EXP<X) 

G uso da matematica em areas como a engenharia e a 
fisica requer a utilizaca"o de enpoentes naturals que tern e 
(aprox. 2,718) como base. Se e elevado a X e igual a Y, 
entSo podemos usar a seguinte f formula para o calculo de Y: 
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Y a e ■"■ X 

Na linguagem BASIC do TK--2000 COLOR, podemos expressar 
isto par Y= EXF(X). Execute o programs a seguir e con-fira 
seu result ado. 

>NEW 

>10 FOR I - 1 TO 5 

>20 PRINT "EXP ("Sis") ■ " ;EXP(I) 

>30 NEXT I 

>40 END 

Resul tado 

>RUN 

EXPO.) = 2.71828183 

EXP (2) fc 7.3890561 

EXP* 3) » 20.0855369 

EXP (4) = 54.5981501 . 

EXP (5) = 148-413159 



XII. 2. 4. f Fun§:a-o Logaritmica - LDG<X) 

A funfclo logaritmica pods eer obtida no TK-2000 COLOR 
atraves da insfcruca'a: 

LQG(X) 

Veja o ewemplo: 

>NEW 

>10 FOR I m i TO 5 

>20 PRINT "LDG<"; I? ,J > m " ; LOG C I > 

>30 NEXT I 

>40 END 

Apas RUN teremos: 

>RUN 

L0G(1) * | 

LOG (2) = .693147181 

LOG (3) - 1.09861229 

LOG (4) = 1.38629436 

LOG (5) ■ 1.60943791 



XII. 2. 4. g. Raiz Quadrada - SOR ( X ) 

Esta ■funfa'a ja foi apresentada no capitulo III, e tern 
par finalidade extrair a rais quadrada de urn n&mero. Execute 
o programs a seguir e con-fira voc£ messmo os resultados. 
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>NEW 

>1& HOME 

>20 INPUT "QUAL O NUMERO "5 A 

>30 PRINT "A RAIZ QUADRADA DE ";A$ M E M ;SQR(A) 

>40 FDR I m i TO 500 : NEXT I 

>50 GOTO 20 
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FACA D SEU RESUMO 

I . Mas operates tr i gonom&tr i cas o TK-2000 COLOR utiliza 
como unidade da medida de Sngulos o ...... 

2.. 360 equivalent aprox i madamente a 6.28 ...... , desta 

■forma, para sabermos o valor de um ctngulo de A <A graus) em 
..„...«, podemos utilizar a formula: 

Xrd = 6.28 x A / 360 ou Xrd = a / 57.29578 

3. As instrucSes BASIC, para calculo do seno, cosseno e 
tangente saci respecti vamente: 

(X) 

* • ' " ■ « H ■ ■ ■ * A. * 

(X) 

4. Para calcularmos o cosseno de 45 devemos emitir a 
i nstrufelo! 

COS £ . . . ) 

5. Os valores do seno e cosseno de quslquer Sngulo est&o 
comprendidos entre e . . . 

6. A instrufSo RND ( ) fornece valores aleatorios entre 

m 0.999999999, enquanto RND (...... ) repete a n timer o pel a 

instruca"o RND anterior e RND ( ) seleciona um n timer o 

aleatorio e de valor bastante pequeno. 

7. valor absolute) de um n timer o X e obtido atraves da 
instruf^o (X) 

8. A instru^So inversa de .....(X) ou seja, o arco-tangente 
de um ntimero & obtido atraves da instrucSo: 

(X) 

9. Teremos o valor -1, on +1, dependendo respect ivamente 
se X -for negative, ou positivo, usando-se a funSo: 

U> 

10. T'endo o numero natural e (cujo valor e 2.718) como base, 
a operaca"o Y = e -"■ X e obtida no BASIC do TK-2000 COLOR na 
forma: 

Y = (X) 

II. Para se obter a logaritmo de X utiliza-se a instru^cto 
. „ . , (X) 

12. A instruca'o que fornece a rair quadrada de um numero X 

S ■ n M a m » » 

respostas: 

l,.radiano; 2. radianos, radianos; 3. SIN,, COS, TAN? 4. .785 

5. 't, -l; 6. 1,0, -X; 7. ABS|! 8. TAN, ATNs 9. " SSNj 10. EXP 

11. LOG ; 12. SQR(X) 
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CAPITULD XIII. MANIPULACAO DE FIGURAS EM ALTA RESOLU^AO 
XIII. 1. INTRODUCAO 

As operates a seguir 5S0 urn pouto mai 5 trabalhosas e 
complex .as, porem as resultados compensam tai s di I i cul dades. 

"TK-2000 COLOR tern cinco comandos especiais, que per- 
mitem manipular figuras no modo grafico de alta resol utp3o. 
!3ao eles! DRAW, XDRAW, SCALE, ROT e SHLOAD. Antes que estes 
comandos possam ser usados, urn tra^ado deve ser definido 
por uma "def ini ci=(o de figuras"., que e constituida por uma 
sequencia de vetores armazenados em uma serie de bytes da 
memoria do TK--2000 COLOR. Uma ou mai s destas definitions de 
figuras, cujo conjunto forma uma "tabela de figuras", podem 
ser criadas atraves do teclado e armazenadas na. fita 
cassette para uso future 

Cada byte de definicSo de figura & dividido em tr&s 
setor es, e cada setor pode especi i icar urn vetor, podendo ou 
nSo demarcar urn ponto, e tambem uma direca"o de movimento 
(para circa, para baixo, direita ou esquerda) , DRAW e XDRAW 
utilizam cada byte na definite da figura, setor por setor, 
desde a primeira ate a ("iltima definicrSo do byte. Duando um 
byte que contem somen te zeros e alcanfada, a defini^So da 
figura e final isada. 

Abaixo pode-se ver como os tres setores A, B e C s&o 
distrifouidos num byte que 1 forma uma definido de figura: 



setor: 

IMttmero do bit no byte 

Especi f i ca^ao 

Fig. XII I. 1. 



C B 



0HH 



D D 



D D 



D D 



Cada par de bits DD especifica uma dire^ao de 
to, e cada bit P especifica se o ponto deve ou 
demarcado antes do movimento, conforme indica a 
segui r : 



ffiovi (Hen- 
ri a 1 a ser 
tabela a 



Bits 


val or 


aca'o 


DD 


I 


move para cima 


DD 


move para a direita 


DD 


10 


move para baixo 


DD 


11 


move para a esquerda 


P 





na"o demarca 


P 


1 


demarca 



Tabela XIII. 1. 

Note que o Ultimo setor C (os doi s bits mais 
si gnif i cati vos) , nSto tem bit do tipo P. Para este setor P & 
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ccinsi dorado como igual a zero, de modo que o setor C 
especi-ficar somente movimento sem pontos demarcadas. 

DRAW e 
esquerda (A, 
ver somente 
acabar com 
(para ci ma) , 



pode 



XDRAW processam os setores da direita para a 
B e entSo C) . JQualquer setor do byte que conti- 
zeros e igngj^ado. Desta -forma o byte na"o pode 
urn movimento no setor C, que corresponds a 00' 
pois este setor contera apenas zeros? e neste 
caso, B n&o pode fazeV o movimento 000, que tambem sera 
ignorada e o movimento 000 no setor A que final izarA entSo a 
de-finifSo da -figura, a menos que haja urn bit 1 em B ou C. 

Suponha que voce queira desenhar a -forma que aparece na 
•figura XI 1 1. 2 

• • • 



Fig. XIII. 2. 



• • 



Pr imeiramente desenhe esta forma em papel quadriculado, 
um ponto por quadrado. Em seguida decida por onde comecar o 
desenho da -figura. Vantos comecar esta pelo centrq, Desenhe 
ent&o uma linha passando por cada ponto do desenho, usando 
apenas a-ngulos de 90 para as mudancas de direcSo, como 
mostra -figura abai;:o: 
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FIG. XIII. 3. 

Redesenhe a -figura com uma serie de vetores, cada um 
com um movimento, para baixo, para cima, esquerda ou direita 
e destaque os vetores que, antes de se mover devem msrc^r um 
traco. 



Fig. XIII. 4. 
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Agora junte os vetores numa sequ^ncia; 



II- 



mm 



i * * • 

mi 



Execute como r 


■nostra a tabela XIII 


.2 




^\se?tor 
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Vetores 


bytG?*\^^ 
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1 00 
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101 
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*•-► 


6 






110 


110 
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7 






011 


110 


«- + 
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111 
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00 




000 


000 


FIHALIZA 



TABELA XII I, 2 



este valor nSo pode 
plDtar dli mover para 
cima 



VETOR 


C0DI6D 


♦ 


000 






001 OH 


01 


t 


1 ou 


10 


* 


011 OU 


11 


t 


100 




■ ^4^" 


101 




i 


110 




~^^M4 


1 11 





so 

rnovi mentant 



Plot am e 
movi mentam 



que, 



Para introduzir os cbdigos na tabela anterior basta 

i vetor desejado, se consul te o 



de acordo com 



respective codigo na tabela XIII. 1. preenchendo os setores, 
da direita para a esquerda e, quando posslvel, preenchendo o 
setor C. 



Agora forme uma nova tabela como a tabela XI 1 1. 3 



seffto 
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He>sadeci mal 


byte 
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15 
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36 
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fit 1 1 


1 1 


IE 




a 











1 1 1 


07 
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00 



lo. di gi to 



2d. di gi to 



TABELA XHI.3. 

Os valores hexadeci/nais, sa'o obtidos apl i cando cada 
grupo de 4 bits de urn byte na tabela XIII. 4. 
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COD I GO B I WAR 10 


COD I SO HEX 


0000 





0001 


1 


0010 


2 


00 1 1 


3 


0100 


4 


0101 


5 


0110 


6 


0111 


7 



COD I GO BINARIO 


COD I GO HEX 


1000 


8 


1001 


9 


1010 


A 


1011 


B 


1100 


C 


1101 


D 


1110 


E 


1111 


F 



Tabela XI 1 1. 4, 



con junto de bytes a que cheg 
tabela XIII. 3. e a definicSo da -fig 
parametros a mais que e necessaria que 
tabela de f iguras f i que completa. A 
cujo endereca generi co sera denomina 
n£imero de def ini c&es de figuras 
hexadecimal. No nossa caso o nfrmero e 
incluir os Indices (em hexadecimal) 
bytes apos o inicial comeca a definicS 
colocaremos a nossa de-f i ni^So de f i gur 
de seu indice Cuma vez que s6 ha uma 
Isto significa que neste caso, a de-f i 
S + 4. A figura a seguir c on t era o for 
o seu formato no caso do exemplo apres 



amos, apresentada na 
ura. Ha ainda alguns 
se forneca para que a 
localiza^Ko da tabela, 
do S, deve conter D 
(de a 255) , em 
urn. Em seguida devemos 
que e>:pr i mem quant os 
o de cada figura. Nos 
a i mediatamente abaixo 
definite de figura). 
nitja'o sera iniciada em 
mato geral da tabela e 
en t ado. 
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Enderet^o inicial = S 
Bytes S+0 

+ 1 

+2 

+3 

+4 

+5 

+2n 

+2n + l 



n 


(0 a FF) 








Na"o usado 


2 


dl gi tos 


de 


menor 


valor 


o 


digi tos 


de 


maior 


valor 


2 


dl gi tos 


de 


menor 


val or 


2 


digi tos 


de 


mai or 


val or 






dl gi tos 


de 


menor 


val or 


2 


digi tos 


de 


mai or 


val or 



♦Nfimero total de de- 

IfinjcBes de figuras 
Dl: Indice do 1 by- 
te de de-fini?So 
da -figura 1 r 
rel ati vamente a S 
indice do 1 by- 
te de definite 
da -figura n, 
rel ati vamente a S 



>Dn: 



S+Dl 



S+D2 



S+Dn 



1 Byte 


'. ', 


01 timo 


byte 


= 00 




1 Byte 


; ; 


Ultimo 


byte 


* 00 




1 Byte 


: ; 


01 ti mo 


byte 


= 00 



Def initio da 
figura #1 



Defini^iSD da 
-figura #2 



Definifa'o da 
■figura #n 

Fig XI 1 1. 5. Formate Geral da label a de Defini^CJes de Figuras 

Byte 



1 
2 
3 
4 
5 
6 
7 
8 
9 
A 
B 
C 
D 



01 



00 



04 



00 



10 



64 



2D 



36 



IE 



07 



00 



Numero de Figuras 
IM&o usado 

c sq de 



Indice da definit 
■figura #1 



► Definica"o da Figura #1 



Byte de f inal izac^o de defi- 
nica'o de figura. 



Fig XIII. 6. Tabela de finaliza^Ka da definitja'a da figura de 
e>:empl o. 



X 1 1 1 . 1 . 1 . M0D0 MONITOR 

Para registrarmos dados apresentados na figura XI II. 6. 
devemos entrar no M0D0 MONITOR do TK-2000 COLOR. Dentro 
deste modo, o TK-2000 COLOR deixa de estar sob control e do 
interpretador BASIC e passa a ser controlado pelo programs 
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monitor propriamente ditD. 

A mudanfa para o MODO MONITOR e obtido atraves dc 
instru^eSo: 



>CALL -159 (RETURN) 

QU 

>LM (RETURN) 



sabemcis que o TK-2000 COLOR entrou no modo monitor quando o 
sinal ">" no inlcio de uma linha de comando e substituido 
por d. 



XIII. 1.2. Carga da Tabela de Figuraa. 

Agora voce est a pronto para digitar sua tabela de 
■figuras na memoria do TK-2000 COLOR. Primeiro escolha urn 
endere^o inicial. Para o prosseguimento de nosso exemplo 
vaflios selecionar 1DFC. . . 



OBSERVACAQ: endere^o escolhido deve ser menor que o mai or 
endereco existente na memoria do si sterna, e nao 
deve estar numa area utilizada por HGR. 
endereco 1DFC e justamente abaixo da la pagina de 
memoria utilizada para de-finic3o de gra+icos de 
"alta resolucSo- 

Digite agora o endereco inicial da tabela de figuras. 

&1DFC 

■ 

Se voce pressionar a tecla RETURN, o TK-2000 COLOR ira 
mostrar o conteodo do endereco especi-f i cado. Agora execute o 
seguinte. 

*1DFC: 01 RETURN 
91DFC RETURN 

1DFC- 01 

TK-2000 COLOR di2 que o valor 01 (hexadecimal) esta 
armazenado na local izaca"o cujo endereco e 1DFC. Para armaze- 
nar mais do que dois digitos de numeros hexadecimais em 
bytes sucessivos de memoria, basta entrar com o primeiro 
endereco (1DFC) e enta*o com as valores desejadas, separados 
por espaco. Entremos agora a nossa tabela. 

ttlDFC: 01 00 04 00 12 3F 20 64 2D 15 36 

IE 07 00 RETURN 

Para con-ferir as i n-f ormaf^es da sua tabela de -Figuras, 
voce pode examinar cada byte separadamente ou si mpl esmente 
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pressionar repetidas vezes a tecla RETURN at£ que todas oe 
bytes que interessam ( e provavelmente alguns a mais) sejam 
ap resent ad os. 

81DFC RETURN 

1DFC- 01 

9 RETURN 

00 04 00 

a RETURN 

1E00- 12 3F 20 64 2D 15 36 IE 

a RETURN 

1E08- 07 00 ^FF FF 78 7B FF FF, 

estes bytes n&o interessam 

XIII. 1.3. Indicando ao BASIC o local da Tabela de Fiquraa 

Se a sua tabela de figuras esta correta, tudo que -falta 
e indicar, para poder ser utilizado pela BASIC, onde se 
encantra d endere^o inicial da tabela (isto e -feito 
automat icamente quando essa tabela e carregada de -fita cas- 
sette pelo comando SHLOAD, con-forme serSt vi sto adiante). D 
BASIC "procura" esta indi caca'o no endereeo EB (dais dlgitos 
de menor ordem) e E9 <dois dlgitos de mai or ordem) . Para a 
nossa tabela, iniciada no enderefo 1DFC, devemos digitar: 

9E8: FC ID RETURN 

XIII. 1.4. Prote^ato da tabela de Figuras. 

A protec^o da sua tabela de -figuras de uma alteras^So 

acidental pelo programs BASIC, e convenient^, Com este 

proposito, alteraremos HIMEM: (nas posicoes 73 e 74 hexa) , 
cli gi tando: 

873: FC ID 

Isto tambem e -feito automati camente pelo uso de SHLOAD, 
indicando no pr6>iimp sub-item. 

XIII. l.S. Armazenando uma Tabela de Figuras e SHLOAD 

Para armajenar sua Tabela de Figura, voce precisa 
conhecer tres coisas: 

1. enderefo inicial da Tabela (1DFC, no nosso e>:emplo) 

2. Qltimo endereco da Tabela (1E09, no nosso ewemplo) 

3. A di-ferenca entre os enderecps -final e inicial 
(000D, no nosso e*empla) 

Estes dados devem ser -fornecidos em hexadecimal e,. no 
caso do nosso exemplo, equivalent a 1DFC, 1E09 e 000D. 
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terceiro dado (diferenca entre os enderecos -final e 
inicial), deve ser armazenado nos endere?Ds if (os dois 
digitos menos signi f icati vds) e 1 Cos dois digitos mais 
signif i cafci vos) : 

90: 0D 00 RETURN 

Agora voce pode "oscrever" (armazenar no cassette), o 
tamanho e o endereco inicial e -final da Tabela! 

00. 1WA 1DFC.1E09WA RETURN 

Na"0 pressione RETURN antes que vdc& tenha colocado a 
fita cassete no gravador, rebobi nando-a e pressionado os 
control es de gravacSo (provavel mente as teclas FLAY e RECORD 
do gravador, si mul taneamente) B Pressione ent&o a tecla 
RETURN do TK--2000 "COLOR. 

Para ler a fita, rebobine-a, pressione a tecla PLAY com 
o TK-2000 COLOR sob o control e do BASIC digiteS 

>SHL0AD RETURN 

Voce devera onvir Lira sinal sonbro (beep) quando a 
numero de bytes da tabela -for lido com sucesso e urn segundo 
sinal quando for conclulda. a leitura da Tabela. 



XIII. 1.6. Saindo do Modo Monitor 

Para sair do modo monitor bast a manter a tecla CONTROL 
pressionada, digitar a tecla C e em seguida (apos soltar 
ambas as teclas) pressionar RETURN „ 



XI 1 1. 2 USANDO A TABELA DE FIGURAS 

Podemos agora escrever um programa em BASIC usando a 
tabela de figuras e os comandos apropriados, que serSo 
vistos a seguir 

programa abai>:o & bastante simples e define uma 
-figura na tela, exec Lit a Lima rota^a'o de 16 gratis e entSo 
repete a -figura apresentada. Cada nova figura tera tamanho 
maior que a anterior. Execute-o com RUN. 

>100 HGR 

M10 HCOLOR m 3 

">120 FOR R = 1 TO 140 

>130 ROT = R 

>140 SCALE m R 

>150 DRAW 1 AT 139,90 

>160 NEXT R 
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Para ver , i ni ci almente, urn pequeno quadrado, adicione a 
.1 inha: 

>133 END 

F'ode-se enta*o adicionar uma pausa e apaqar cada quadra- 
do apds sua apresentac&a adicionando-se: 

>153 FOR I - TO 1000 : NEXT I 
>155 XDRAW 1 AT 139,90 

Execute o comando RUN e observe agora o desenvol vimento 
do programs. 

XIII. 2.1. DRAW 

DRAW A AT X,Y 

E desenhada Lima f igura no modo grafico de alta 
resolu^a, comecando no ponto cujas coordenadas sSo : X,Y ;. 
A -f igura &h a A-esima da tabela de fi guras, carregada 
previamente pel o comando SHLOAD on digitada no modo monitor 
do TK-2000 COLOR. 

valor A deve estar entre e B # ondE n & o nomero 
(entre e 255) da definica'a de i-igura indicada no byte da 
tabula de -fi guras. X deve ter va lores entre e 278 e Y 
entre e 191. Qualquer valor que exceda os li mites 
apresentados causara a mensagem de erro. 

? VALOR I LEGAL ttERRO 

A cor, rotacci'o e escala da $ igura a ser apresentada 
devem ser indicadas antes que DRAW se j a executado. 

Quando o comando DRAW e emitido sem a existencia de uma 
tabela de fi guras, pode acontecer que o si sterna nSo se j a 
recuperado. Deve-se entSo pressionar as teclas RESET on 
CONTROL C RETURN. Pads tambem acontecer que sejam criadas 
-figuras aleat.6rias em toda &re& de memoria para graficos de 
alta resoUiftao, possi velmente destruindo o sen programa. 



XII I. 2. 2. XDRAW 

Este comando e similar a DRAW, exceto que a cor usada" 
para desenhar a f igura e a complementer daquela ja existente 
Diss pontos determi nados. Desta -forma, atraves de XDRAW pode- 
bk suprimir da tela urn tra^o ja existente, sem al ter ar a cor 
de fundo da tela. Seu formato e o mesmo que o da instrucefo 

draw: 

xdraw a at %'. y 
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XI I I. 2. 3. ROT e SCALE 

formato da primeira instru^^o e : 
ROT « X 

El a tern por func<=(o e>:ecutar Lima rotacao na figura a ser 
tra^ada por DRAW ou XDRAW. dngula de rota^ao e 
especificado por X, cujo valor pode ser a 255. 

RGT=0, t?M especificar uma rotafa'o nula; R0T=16 faz com 
que a -figura definida por DRAW execute urna rotac&o de 90 
graus no sentido do relogio (hor&rio) ; ROT ft 32 causara uma 
rotacao de 1.80 graus no sentido do relftgio, e assi m por 
diante. A repetifSo do processo ocorre com R0T : =64. 

Para SCALE=1,, apenas 4 valores de rota^^a sSo recomen- 
dados (0, 16, 32 & 48)3 Para SCALENE,, s^o recomendados 8 
rotates, 1 assiin por diante. Os valores de rotacSo n^o 
reconhecidos niSo causar&o igeralmente) a definigSo da figura 
orientada de acordo com o prime! ro valor de rotacao 
def i ni do. 

A instrufao SCALE determi na o tamanho da -figura a ser 
tracada por DRAW ou XDRAW, a parti r do valor t 
(reproduzindo, ponto a ponto, a definica-o da -figura) ate 255 
(quando cada vetor § ampliado 255 veses) . 

Important.^: SCALE=0 e 6 maj-simo taimanho e nislo apenas urn 
ponto. 

A -forma geral desta instruca'o e : 

SCALE s X 

onde X detennina a escala da figura. 

Para encerrar o assunto, por enquantD, i apresentado 
abaixo urn outro pragrama cam a meema tabela de figura usada 
no ewemplo anterior: 

>NEW 

>10 HGR 

>20 .1 = INTI RND<1> * 6 * 1) 

>30 HCOLOR = J 

>40 FOR I = 1 TO 25 

>50 ROT = 1 

>60 SCALE = I 

>70 DRAW 1 AT 70,90 

>80 DRAW 1 AT 210,90 

>90 NEXT I 

yum goto 20 

Note que agars. surgem duas figuras iguais e que a cor 
varia random! camente de uma ej-ieeucSo pars, outra. 
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XII 1.2.4. SHLOAD 

Coma ja vimos o comando SHLOAD carrega uma tabeta da 
■fita cassete. Esta tabela e carregada exatamente abai>:o de 
HIMEM: j e HIMEM: e fixado depots, abai.NO da tabela para 
proteg#-la. Na hpr a da leitura o endere^o inicial da tabela 
e -fixado automat icamente. Se uma segunda tabela e carregada, 
substituindo a primei ra tabela, HIMEM: deve ser resetado 
antes do SHLOAD para evitar perda de memoria. 

So o comando RESET pode deter o SHLOAD. 
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FApA SEU RESUMD 

1- A de-finicSo de figuras e constitulda par urn can junto de 

Far sua vez , urn con junto de definicfles de -figures 

-Forma uma ......... . , 

2. primeiro endereco da deve conter o 

de de-finicftes de figuras. Em seguida deve-se 

incluir os que determi nam quantos bytes apfis o 

byte inicial comeca a definicSo de c*da uma das figura. 

3. Para entrar no modo monitor do TK-2000 COLOR devemos 
emitir o comando -159 ou 

4. No modo monitor, para sabermos o conte&do de determinado 
endereco basta digitarmos o endereco desejado e a tecla 
RETURN. Se no entanto qui sennos carregar urn valor 
hexadecimal num determinado endereco, deveremos digitar: 
<enderecoX. .. Xval or hexadeci mal > RETURN 

5. Para a c^rqa de varios valores em enderecos 
consecutivos, basta dar o endereco inicial, conforme se ve- 
na quest&o anterior, em seguida digitar cada valor separados 
por urn e so no -final da carga pressionar RETURN. 

6. Q endereco inicial da deve ser 

carregado atrav^s da ordem : 

< >< X2 byte dp end . X X 1 byte do end . > 

Esta ordem & executada automaticamente atraves do comando 
SHLOAD. 

7. Para se proteger a de uma 

alter aca"o aci dental, carrega-se seu endereco inicial em 73H, 
atraves da ordem: 

<....> <....„ > <2 byte do end. > < > < 1 byte do end . > 

Esta ordem tambem & executada automaticamente por SHLOAD. 

8. Para se armazenar a em -fita cassette,, 

deve-se conhecer . sens enderecos f e a 

diferenca entre eles. 

9. A instrucclo 
........ A AT X . Y 

permits tracar qualquer uma das figuras de-finidas pela" 

, sendo que (X,YJ indica o ponta 

do tracado. Se -for desejado o tracado da segunda 

de-f inica*o de -figura da . . .....„, o valor de A 

devera ser ........ 

10. A instrucSo £ similar a ........ porem utiliza a 

cor ........ para o tracado de uma figura. El a pode ser 

usada para ........ urn tracado , sem alterar outras Areas da 

tel a. 

11 **M;| de-fine uma rotacgto de 90 grans na -figura a 
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ser trafada por . . ou 



12. Determina— se o tamanha da -figure a ser tra^ada par 

on atraves da instru^eto „„„„„„.„ . ......... =1 

reproduz o tracado panto a ponta e . . . u . , =255 amplia 255 
vezes os vetores que compete a fi gura. 

13. Para carregar no TK-2000 CDLDR uma 

contida em fita cassette, ap6s a correta preparafeia da 
gra-Fico, deve-se e:-;ecutar o comando . .. 



Ci5EQ§tas: 1 . vetores, tabela de -figuras," 2. tabela de 
figuras, nflmero, indices? 3. CALL, LM; 4. : j5„ espafo; 
A. tabela de figuras., E8, S , espaco; 7. tabela de -figurasj 
73, : , espafo; 8. tabela de -figuras, inicial, -final; 9. 
DRAW, tabela de figures, inicial, tabela de figuras, 2; 10. 
XDRAW, DRAW, compl ementar , suprimir," 11. ROT, DRAW, XDRAW? 
12. DRAW, XDRAW, SCALE, SCALE, SCALE? 13. tabela de -figuras, 
SHLOAD 
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CAPITULO XIV - USD DE ROTINAS EM LINGUAGEM DE MAQUINA 

Seria pretencioso querer esgotar em uma anica publica— 
Ccfo urn assunto ta"o vasto e profundo como e a programacelo 
deste computador. Desta -Forma;, devemos tratjar nossos pr&— 
prios limites. No capitulo anterior j a tivemos alguns con — 
ceitos um pouco mais complexes, cuja assimilaca'a se tornou 
um pouco mais dificil para pessoas inexper i entes. liso da 
linguagem de maquina permite uma maior f 1 e>; i bi 1 i dade, melhor 
aproyei tamento da memoria e facilidades e programafSo no TK— 
2000 COLOR. Este assunto porem e bastante e>;tensa e apresen- 
ta uma certa compl ex i dade, de -forma que devera ser abardadp 
por uma nova publica$;ao- Neste capltulo, descreveremos ape- 
nas, de forma sintetica as instrucdes BASIC relacionadas ao 
uso da linguagem de maquina, permitindo que programadores 
mais en peri en te possam utilizA— las. 

Uma vez que este capitulo nao tern um tear pratico 
propr laments dito, ele ncfo sera acompanhada do item "FACA 
SEU RESUHO" u 

As instrucfSHs PEEK e POKE pertencem a este grupo, e ja 
foram apresentadas. ' 



XIV. 1. CALL 

Est a instrucSo causa o desvio do programa para uma 
rotina em linguagem de m&quina. Sua forma geral e: 

CALL nym 

onde >;yz e o endereto inicial da rotina desejada. Para que, 
apos a execufSo da rotina, o programa volte automat i camente 
para a pro>:ima ordem ap6s CALL, a ultima instruc&o da rotina 
deveri ser RETURN. 

No capitulo anterior, j & utilizamos uma vez est a 

instrucSo para entrar no modo monitor (CALL -159). Outro 

exemplo da. utiliza^ao desta instrucao e CALL-936, cujo 
E-feito e ewatamente o mesmo do comando HOME. 



XIV. 2. WAIT 

A forma geral desta instruc&a e : 

WAIT i 9 .%'$ 

El a & usada para inserir uma pausa condicional no 

programa. X e um endere^o de memoria e deve estar entre as 

li mates -65335 a 65533, for a dos quais provocara uma 
mensagem de erro do tipo: 

?VALOR I LEGAL #ERRD 



173 



Y e Z devem estar entre ob limites a 255 decimal. 
Quando WAIT e executadD, estes valores s£o convert! dos para 
binSrio entre e llllliil. 

Se apenas Y for especi -f i cado, e feita uma operaca'o 
"AND" com cada urn dos bits deste e do contetido que se encon- 
tra no endereco X'. Se o resultado deste processo forem oito 
zeros, a teste e repetido. Se algum dos resultados -for 
diferente de zero, isto e, se houver pelo menos urn bit igual 
a I nos dois bytes, o WAIT e completado e o programa 
prossegue na proxima instruc&o. 

Se os tr#s parSmetros -forem especificados,, WAIT execu- 
tara o seguinte: pr imei ramente uma operacSfo XQR (ou 
exclusive) com cada bit do byte contido no endereco X, com o 
correspondente bit do byte Z. Em seguida, e e>:ecutado urn AND 
entre cada bit resultants da operaca'o citada e do byte Y. Se 
d resultado deste con junto de opera^iies For oito zeros, o 
teste e repetido. Caso contrario o programa prossegue na 
pro:; i ma ordem. 






XIV. 3. USR(X> 



Est a instruct permite a trans-f erenci a do valor X para 
o acuraulador panto -flutuante (enderecos 491) a *A3> e 
e-fetuado urn desvio &o endereco *(3A. Ai deve existir uma 
rotina ou J MP adequados. D valor de retorno para a funcSo e 
o conteuda do acumulador de panto flutuante. 



XIV. 4. HIMEM: 

Per mite determiner a maxima posicSo de memoria 
disponJ. vel para □ programa BASIC, incluindo as variaveis. E 
usada para proteger a area de memoria acima do valor 
determinado. A cir&s. protegida pode center dados, tabelas de 
•figuras ou rotinas em linguagem de maquina. 

A -forma geral desta instrufSo e: 

HTMEM: X 

onde X e o max i mo endereco desejado, podendo varisir de 
-65535 a 65535, fora do que o TK-2000 COLOR emitira uma 
mensagem de erro do'tipo: 

7VALOR I LEGAL #ERRO 

■ 

Veja APENDICE F 
XIV. 5. LOMEM: 

Semelhante 5 instruca'o anterior, de-fine o' menor 
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endere^o disponivel para variaveis. Normal men te, a TK-20(if0 
COLOR define automaticamente LDMEM como o enderefo ap&s a 
area de programa. 

Forma geral da instru^So: 

LOMEM: X 

onde X e o enderefo desejado. 

Veja APENDICE F 
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CAPITULO XV- D COMANDO SOUND 

Uma caracterlstica de destaque no seu TK-2000 COLOR, e 
a possibi 1 idade que ele tern de, atrav^s do alto— falante da 
televisSo, ao qual e conectado, produzir sons. Estes sons 
permitem, por exemplo, tornar os programas de jogos espe- 
cialmente i nteressantes, e proximos a real idade, pela 
imitacSo dos barulhos de bombas, metral hadoras laser etc.. 

Pode-se tambem programar musicas no TK-2000 COLOR, uma 
vez que ele permits a utilizacao de ate quatro oitavas com 
tons e semi-tons, 5 tempos di-ferentes para cada nota. 



Todos estes recursos sa"Q obtidos atraves 
SOUND, descrito a seguir. 



do comando 



NOTfl: Lembre-se que a volume com que o som sera 
dependerS do controls de volume do seu TV. 



emitido 



XV. 1. Comando SOUND 



comando SOUND e a que especi f icamente control a 
tonal idade e a duraclfo da nota gerada do alto -Falante 
televisor. -formato deste comando e : 



a 

do 



SOUND 



X,Y 



onde X represents a nota a ser tocada e Y a duracao desta. 
Para testar a utilizacao deste comando pode-se digitar a 
seguinte instrucSo abaixo em modo imediato : 

>SOUND 192,-240 

apos pressionar RETURN o TK-2000 COLOR emitira uma nota DO 
com uma duracKo inteira, como demonstra o pentagrama abaixo: 




Caso voce queira emitir urn MI com duracao meia nota 
basta digitar : 

>SOUND 154, 120 



XV. 1.1. SOUND XI, Yl TO X2,Y2 

Esta modal idade de SOUND permite tocar em uma mesma 
linha varias notas com suas respect! vas duracbes. Este 
comando agora oferece um maior desempenho que o anterior na 
composipa*o de musicas ou acordes num pequeno numero de 
linhas. Por exemplo, digite o seguinte comando: 
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>SDUND 96, 120 TO 85,120 TO 76,240 

o sam emitido neste caso e a sequencia das notas DO RE MI em 
uma escal a mais aguda. 




XV. i.2. Pausa 

- 

Como -f requentemente nas mftsicas existe a pausa, no TK- 
2000 COLOR h£ urn dispositive que provoca um intervalo na 
continuidade da m&sica. 

Neste caso usa-se o comando SOUND sendo que no espaca 
do torn coloca— se o numero 1. 
Par exempla: 

>SOUND 96,120 TO 1,240 TO 76,240 
XV. 2 EXECUTANDO MCJSICAS 

Uma vez que possufmos em mSas as tabelas XV. 1 e XV. 2 
pademos escrever ou transportar de um pentaqrama diversas 
masicas. Para isso teremos que saber interpreter uma linha 
musi cal . 

Para representar os sons s=fo usados sinais de -forma 
oval que, pel as posi?£)es tomadas no pentagrama indicam os 
sons mais graves ou mais agudos, desi gnando-se o tempo de 
prolangacao pela variedade de sua forma. 






^tr 



«Ui » *, g, ~" g m 



teSg^^g 



^^ 



FA 



Ouando a ( nota vier precedida de uma letra "b" i sto 
signif ica que ' a nota deve ser tocada em bemol (nota 
intermediaria com a anterior) e aa encontrar o sinal de "#'* 
sustenido, ou seja a nota devera ser tocada no torn 
intermediSrio com a nota seguinte. Na tabela XV. 1 estes 
tons tambem foram representados com um "b" ou "#" 
respect! vamente. 

Para representar as tempos de durac&o da nota ja a 
tabela XV. 2 permite identificar cada simbolo pelo seu tempo 
de duracSo bastando somente explicar que as notas unidas 
ir&o ser representadas no TK-2000 COLOR como notas separadas. 



178 



Ja temos agora condic5es de interpretar uma linha de 
m&sica e apos voce rodar o exempla ja estara em candic&es de 
executar programas musicals no TK-2000 COLOR. 

A seguir sSo apresentadas as tabelas comparati vas de 
tonal idade e durat^So das notas: 





T 


N 


A 


L 


I 


D 


A 


D 


E 




SOL 




SOL - 


- 128 


SOL 


— 


64 


SOL - 


31 


SOL - 


15 


LAb 


- 243 


LAb - 


- 121 


LAb 


- 


60 


LAb - 


*7Q 


LAb - 


14 


LA 


™ 231 


LA - 


- 114 


LA 


_ 


56 


LA - 


28 


LA - 


13 


Sib 


- 217 


Sib - 


- 108 


Sib 


_ 


53 


Sib - 


26 


Sib - 


12 


SI 


- 203 


SI - 


- 102 


SI 


- 


50 


SI - 


25 


■ 




DO 


~192 


DO - 


- 96 


DO 


— 


47 


DO - 


i!l> Ul 






D0# 


- 182 


DD# ■■ 


- 90 


D0# 


- 


45 


D0# - 








RE 


- 172 


RE - 


- 85 


RE 


— 


42 


RE - 


21 






Mlb 


- 162 


Mlb - 


- 80 


Mlb 


- 


40 


Mlb - 


20 






MI 


- 154 


MI - 


- 76 


MI 


— 


37 


MI - 


18 


MI - 


11 


FA 


- 146 


FA - 


- 72 


FA 


- 


■i-^i 


FA - 


17 


FA - 


10 


FA# 


- 137 


FA# - 


- 67 


FA# 


— 




FA# - 


16 


FA# - 


9 



TABELA XV. 1 

A fai:-;a compreendida entre o 96 e 47 corresponds 
escala 4 do piano. 



D U R A C A D 



Minima 


240 


Semi ni ma 


120 


Colcheia 


60 


Semioolcheia 


30 


Fusa 


15 


Semi fusa 


8 



1 

1 



\ 
% 



TABELA XV. 2 

Ska apresentadas tres masicas ja incluldas e com suas 
traduffles para o comando SOUND notando inicialmente que 
todas as notas e dura^des -foram diretamente introduzidas em 
comandos DATA que o programa se encarregara de transportar 
para o comando SOUND, sendo que esta operafSa torna o 
programa BASIC mais simples e mais facil de ser digitado. Os 
tempos de duracSo tambem -foram reduzidos e divididos, ja no 
comando DATA pelo seu max i mo divisor comum sendo esta 
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constants, entSo, mul t i pi i cada na mesma linha do comando 
SOUND. Caso vac& queira tornar mais rapida a musics, deve 
ser di minuido o -fator de mul tipl icat?ao de B(I) no camanda 
SOUND. Para melhor entender estes detalhes observe os 
e>!efnpl os: 

EXEMPLO 1 
PARABEN5 F*m VOCE 

>NEW 

>10 DIM A<23), B<28> : REM SENDO A MATR.TZ A AS NDTAS E B AS 

DURACOES. 
>20 DATA 96, 96, 85, 96, 72, 76, 1, 96, 96, 85, 96, 64, 72. 

72, 56, 56, 47, 56. 72., 76, 85, 53, 53, 56, 72, 64, 

72, 72 
>30 DATA 4, 4 : , 8, 8, 8, 8, 4, 4, 4, 8, 8, 8, 8, 8, 4, 4, 8, 

8, 8, 8, 8„ 4, 4, 8, 8, 8, 8, 8 
>40 FOR I m 1 TO 28 : REM LEITURA DA 11ATRIZ DAS TONAL I DADES 
>50 READ A ( I ) 
>60 NEXT .1 

>70 FOR I = 1 TO 28 : REM LEITURA DA MATRIZ DAS DURACOES 
>Q0 READ -Bd) 
>90 NEXT "I 

>100 FOR I - 1 TO 28 : REM EXECUCAO DA MUSICA 
> 1 1 SOUND A (I ) p B C I > *30 
>120 NEXT I 
>130 END 



Exemplo 2 : AT I RE I UM PAU NO GATO 

>NEW 

>10 DIM A<40> , B<40) 

>20 DATA 64, 72, 76, 85 , 76, 72, 64, 64, 64, 56, 64, 72, 72, 

72, 64, 72, 76, 76, 76, 96. 96, 56, 56. 56, 50 !, 56 , 

64, 64, 64, 76, 70, 64, 76, 72, 64, 72, 76, 85^ 96, 

47 
>30 DATA 4, 4, 4, 4, 4, 4, 8, 8, 8, 4, 4, 8, 8, 8, 4, 4, 8, 

8 ? 8, 4, 4, 8, 8, 8, 4, 4, 8, 8, 8, 4, 4, 8, 4, 4, 

4, 4, 4, 4, 8, 8 
>40 FOR I ^ I TO 40 
>50 READ A < I ) 
>60 NEXT I 
>70 FOR I = 1 TO 40 
>80 READ B(I) 
>90 NEXT I 

>100 FOR I = 1 TO 40 
HIM SOUND A(I),BU)*30 
M20 NEXT I 
>130 END 
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Exemplo 3 



A TIME FOR US 



>NEW 

>10 DIM A<100) ,6(100) 

>20 DATA 64, 53, 56, 85, 



80, 
. 85, 
56, 
>24 DATA 42, 
72, 
72, 

JO ^ 

72, 

>30 DATA 1, 



72, .85, 64, 

53, 47, 42, 
64, 64, 53, 

72, 80, 
85, 85, 72, 
53, 56, 64, 



0.5, 0.5, 1, 1, 3 



DATA 



1, 
5, 
5, 

u 

6, 



1 S 



1, 1, 

1/5, 

. 5 , 






0.: . 

1 1 3, 1 , 

>40 FDR I = 1 TO 100 

>50 READ A ( I ) 

>60 NEXT I 

>70 FOR I m 1 TO 100 

>80 READ B(I) 

>90 ME XT I 

>].00 FOR I - 1 TO 100 

>110 SOUND A (I) , B(I)*42. 

>120 NEXT I 

>130 END 



85 
85, 

64 
64, 

40 

JO 

85 
72 

1, 

3, 

1, 
1 

1, 
1, 
1, 



5. 



I 72, 85, 64, 64, 72, 
96, 108, 96, 85, 64, 

, 47, 56, 85, 53, 56, 

53 

, 47, 42, 53, 47, 60, 

, 85, B5, 72, B5, 64, 

96, 85, 96, 108, 96, 

, 64, 64, 47, 56, 85, 
, 64 

1 i 1 , -J> , 1 p 1 [i 1 , O , 

it i--$ *l 3 !" I? If 1 ? 

1, 2, 2, 5, 1, 5, 1, 

3, 1, 1, 1, 3, 1, 1, 

1 , 3 , 1 , 1 , 1 , 3, 1 , 

I I 1 , 1 , 2, 2, 6 



B0, 72, 72, 
53, 56, 85, 
64, 72, 53, 



53, 64, 56, 
80, 



64, 72, 

85, 64, 53, 

53, 56, 64, 



1. If 
1, 6, 



$l 



1 ., 3;, l, 1 ^ 

J. J J. £ J l| 1 | 



XV. 3. EFEITOS SQNOROS EM LINGUAGEM DE MAQUINA 

Alem da possibi 1 idade do comando SOUND em BASIC para 
gerar urn torn, e possivel acessar o canal de earn a nivsl de 
linguagem de maquina. acionamento do canal de som e 
produzido ao acessar o endereco $0030 no modo monitor ou 
PEEK (-16336) ou PEEK (49200) em BASIC. 



Cada acesso a este enderefo e-fetua uma transica*o de 
sinal. Repetido isto a carta -frequ^ncia, e gerado urn som 
cLija -frequencia corresponds a metade da frequ^ncia de 
acesso, 

Desta -forma £ possivel maior versati 1 i dade nos tipos de 
sons a serem gerados, especi al mente quando em rotina em 
linguagem de maquina. 

Em continuaca'o sSo apresentados uma serie de e-feitos 
sonoros que voc^ pode utilizar em programas. 

Para entrar este programa voce- deve 
monitor e inserir nos enderecos indicados 
co.rrespondentes de acordo as instru^ctes 
secSo XIII. 1. 

Caso voce quel ra inseri-los em outros enderecos deverSo 
ser realizadas algumas altera^&es no conteudo deste 



entrar em modo 

as informacaes 

apresentadas na 
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programas. 



METRALHADORA LASER 



0BB6- 20 BF 

08B8- 08 20 BF 0B 20 BF 08 A9 

0BC0- 00 85 FF A9 FF B5 FE A9 

00 SD 30 C0 EE 30 C0 CE 

30 C0 A6 FF CA D0 FD C6 

FE F0 05 E6 FF 4C C7 08 



08C8 
08D0 
08D8 
0BE0 



60 



Para executar este cnmandD no modo monitor 
08B6B du senSo, no Modo BASIC - CALL 2230. 



basta digitar 



Para e>a 
digitar 1560G 







EX PL OS BO 








1560- 


A9 


07 


85 06 


A0 


00 


A9 


09 


1568- 


Qvj 


FE 


A9 00 


SD 


30 


C0 


EE 


1 570- 


30 


C0 


CE 30 


C0 


A 2 


FF 


CA 


1578- 


1)0 


FD 


A2 FF 


CA 


D0 


FD 


A2 


1 580- 


FF 


CA 


D0 FD 


B6 


21 


C8 


CA 


1 JOD 


D0 


FD 


Jdo js, 1 


CA 


D0 


FD 


B6 


1 590- 


21 


CA 


D0 FD 


B6 


21 


CA 


D0 


1598- 


FD 


C6 


FE F0 


03 


4C 


6A 


15 


1 5A0- 


A9 


45 


20 A 8 


FC 


Co 


06 


D0 


15A8- 


BD 


60 












utar 


est 


:e 


efeito be 


ista. 


em 


u, em 


mac 


lo BASIC, 


CALL5472. 





modo man i tar. 



HELICOPTERO 



15AC- 


A0 


*~? "T 


20 


B4 










15E0- 


15 


88 


D0 


FA 


A9 


01 


85 


FF 


13B8- 


A9 


45 


85 


FE 


A9 


00 


8D 


30 


15C0- 


C0 


EE 


30 


C0 


LjC 


30 


C0 


A6 


1 dLa" 1 


FF 


CA 


D0 


FD 


C6 


FE 


F0 


05 


1 5D0- 


E6 


FF 


4C 


BC 


15 


A9 


03 


85 


15D8- 


08 


A9 


20 


8vj 


06 


A9 


03 


85 


15E0™ 


07 


8D 


30 


C0 


EE 


30 


C0 


CE 


15E8~ 


30 


C0 


C6 


06 


D0 


02 


C6 


07 


15F0- 


D0 


F8 


C6 


08 


D0 


E3 


60 





Para. executar este efeito basta, em modo Monitor 
digitar 15ACG du, no modo BASIC, CALL 5548. 



1 Bj 



BATALHA 

14D6- A9 FF 

14D8- 83 07 A9 FF 85 09 A9 80 

14E0- B5 FE A9 00 8D 30 C0 EE 

14EB- 30 Em CE 30 C0 A0 03 A6 

14F0- 09 CA D0 FD A2 64 CA D0 

14F8- FD 88 F0 03 4C EF 14 56 

1500- 09 A9 00 8D 30 C0 EE 30 

1508- C0 CE 30 C0 A0 03 A6 07 

1510- CA D0 FD A2 64 CA D0 FD 

1518- 88 F0 03 4C 0E 15 C6 FE 

1520™ F0 05 E6 09 4C E2 14 20 

1528- SB IS 20 3C 15 20 3C 15 

1530- 20 ZC 15 20 3C 15 20 3C 

1538- 15 20 :5C 15 A9 FF 85 FF 

1540- A9 9B 85 FE A9 00 8D 30 

1 548- C0 EE 30 C0 CE 30 G0 A6 

1550- FF CA D0 FD C6 FE F0 05 

155S- E6 FF 4C 44 15 60 

Para executar este e-feito basta,, em modo monitor 
dig iter 14D6G e P em mode BASIC, CALL 5334. 



Uma vsz que os e-feitos sonoros apresentados acima 
ap re sen tarn enderetros campleflientares, poderia-se :incluir-].DE; 
todoB de Lima so vez na rnemftria RAM, Deste modo seria possivel , 
atrav&s da proqrama abaixo, a combinacao de todos os efeitos 
de uma b6 ves ■ 

>10 CALL 5548 

>20 CALL 2230 

>30 CALL 5334 

>40 CALL 5472 

>RUN 
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APENDICE A 

FUNCOES TRIGONOMETRICAS 

As funfftes tr i gonomfetr i cas apresentadas a seguir, camo 
n&o faiem parte do BASIC TK-2000 COLOR, podem ser obtidas 
atrav^s das seguintes -f&rmulas: 

SECANTE 

SEC(X) = 1/C0S(X) 

COSECANTE 

CSC(X) = 1/SIN(X) 

CQTANGENTE 
COTCX) m 1/TAN(X) 

SENO INVERSO 

ARCSIN(X) = ATNC X / SQR C-X * X + 1>) 

COSSENO INVERSO 

ARCCOS(X) = -ATN( X / SQR (-X * X + D) + 1.5700 

SECANTE INVERSA 

ARCSEC(X) * ATN (SQR ( X * X - 1 ) ) + CSGIMCX) - 1) * 1.5708 

CDSSECANTE INVERSA 

ARCCSC<X> = ATN i 1 /SGR ( X * X - 1)) * (SGNCX) - 1) * 1.5708 

COTANGENTE INVERSA 

ARCCOT(X) = -ATN(X) + 1.5708 

SENO HIPERBOLICO 

SINH(X) = CEXP(X) - EXP(-X)) / 2 

COSSENO HIPERBOLICO 

C0SH<X) = CEXP(X) + EXF(-X)) / 2 

TANGENTE HIPERBOLICA 

TANHCX) = ~EXP<-X> / (EXP(X) + EXP(-X)) * 2 + 1 

SECANTE HIPERBOLICA 

SECH(X) = 2 / (EXP(X) + EXP(-X)) 

COSSECANTE HIPERBOLICA 

CSCH(X) - 2 / <EXP(X> - EXP(-X)) 

COTANGENTE HIPERBOLICA 

CDTH(X) = EXP(-X) / (EXP(X) - EXPC-X)) * 2 + 1 

SENO HIFERBOLICO INVERSO 

ARGSINHCX) = LOG( X + SQR < X * X + 1>) 



IB: 



COSSENO HIPERBGLICO INVERSO 
ARGCOSH(X) = LOGC X + SOR (X * X - 1)) 

TANGENTE HIPERBOLICA INVERSA 

ARGTANHCX) = LOG CU + X) / U - X)) / 2 

SECANTE HIPERBOLICA INVERSA 

ARGSECH(X) p = LOGM SQR C-X * X + 1) +1) / X 

CDSSECANTE HIPERBOLICA INVERSA 

ARGCSCHCX) = LOG (SGN(X) * SQRCX * X +• 1) + 1) / X 

COTANGENTE HIPERBOLICA INVERSA 
ARGCOTH(X) = LOG((X + 1) / (X - D) / 2 

A MOD B 

MOD(A) = INT((A / B - INT (A / B) ) * B + .05) * SGN(A / B) 



IB6 



APENDICE B 
MENSAGENS DE ERRO 

Quando ocorre um erro o BASIC interrompe o programa em 
execu^Q e na*o £ posslvel executar CONT. Para se precaver 
contra isto pode ser usada uma subrotina apropriada atrav&s 
de am DNERR GOTO, 

A seguir uma breve explicaca"o acerca dos erros e suas 

L_ ci \-\ t^> ri ._* « 

NEXT SEM FDR 

A variavel utilizacia no comando NEXT e di-Ferente 
da variavel usada no ultimo comando FOR, ou entao 
eidste algum comando NEXT sem que houvesse 
previamente um comando FDR. 

SINTAXE 

Falta de parenteses, pontuac^o incarreta, comando 
digitado errado ou inexistente, caracter i legal, 
variavel n&o compati vel etc. 

RETURN SEM GOSUB 

Existe algum comando RETURN sem que houvesse 
previamente definido um comando GOSUB. 

NAD HA MAIS DATA 

Um comando READ -foi encontrado porem nSo hA mais 
DATA disponivel (todas as variaveis ja foram lidas 
ou inexiste o comando DATA) 

VALOR I LEGAL 

Podera ocorrer numa das seguintes condicfies: 

a) Valor negative na definite de um array (Ex: 
LET A (-3) = 0) 

b) LDG com argumento nula an negativa 

c) BQR cam argumento negativo 

d> Uso de argumento imprdprio nos comandos MID*, 

LEFT*, RIGHT*, WAIT, PEEK, POKE, TAB, SPC, 

ON GOTO 

e) A "• B sendo A negativo e B n&o inteiro. 



ESTOURO 



D resultado de uma opera?3fo matematica foi mai or 
que a capaci dade de BASIC de representa-1 o. 



EXCEDE MEMDRIA 

Podera ocorrer numa das seguintes condi^ftes: 

a) Programa muito ex ten so 

b) Excesso de variaveis 

c) Mais do que 10 loops de FOR. .... .NEXT 

d) Mais do que 24 loops de GOSUB RETURN 

e) Mais do que 36 niveis de calculo (par&nteses>- 

f) LOMEM mai or que HIMEM 



187 



COMANDQ NAO DEFINIDO 

Ocorre quando urn SOTO ou GOSUB re-ferencia ume 
linha de programa inexistente. 

INDICE I LEGAL 

Ocorre quanda o indice de urn array -far maior 
que DIM especi -F i cado. Ex: LET A C 1 , 1 , 1 ) =5 ou LET 
A(l,3>— 5 , porem foi dintensionado DIM AC2,2). 

RE'DIM' DE ARRAY 

Ocorre quanda urn array -foi dimensianado mais do 
que uma vez dentro de urn programa. 

DIVISAO FOR ZERO 

Qual quer tentativa de diviscfo por zero acusara 
err a. 

COMANDO I LEGAL 

Os comandos INPUT, DEF FN, DATA n&o podem ser 
usados no modo i mediate 

INCOMPATIVEL 

Ocorre quando o comando -for al-Fanumerico e a 

variavel associada -for numeri ca ou vice- versa. 
Ex : LET A* = 5 

EXCEDE STRING 

Ocorre quando for criado urn string maior do que 
255 caracter&&„ 

FORMULA MUITO CDMPLEXA 

Ocorre quando houver mais do que 2 comandos 
seguidos de IF "xx" 
Ex: IF "xx" THEN IF "xx" THEN IF "yy" THEN . 

IMPOSSIVEL 

Ocorre quando se deseja continuar um programs 
inexistente ou que foi i nterrompi do por outro 
erro. 

FUNCAO NAO DEFINIDA 

Ocorre quando se re-ferencia a Lima fun^fKo nSfo 
de-finida anteri ormente. 
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CODIGOS 


CDD'IGO 





12 


20 


36 


tfr-Ti 


64 


71 


85 


105 


118 


134 


150 


164 


176 


189 


211 


221 



DOS ERROS OBTIDDB ATRAVES DE PEEK (222) 

ERRQ 

NEXT SEM FOR 

SINTAXE 

RETURN SEM GDSUB 

NAO HA MAIS DATA 

VALOR I LEGAL 

ESTOURO 

EXCEDE MEMORIA 

CGMANDO NAO DEFIN'IDO 

HMD ICE I LEGAL 

RE' DIM' DE ARRAY 

DIVISAO FOR ZERO 

COMANDO I LEGAL 

INCOMPATIVEL 

EXCEDE STRING 

FORMULA MUITO COMPLEX A 

IMPOSSIVEL 

FUNCAO NAO DEFINIDA 
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APENDICE C 

ECONOMIA DE ESPACO E TEMPO 

A sequi r serSo apresentadas algumas "dicas" re-ferentes 
a procedimentos que d usuArio pode adotar com a -final idade 
de compactar o uso da memoria pelo seu programa. 

i) Use linhas de moltiplos camandos, de no maximo 
239 caracteres. Este procedimento se recomenda 
apos d programa ter si do test ado j a que a edic&o 
pode resultar dificil se for encontrado algum 
erro. 
Ex: 10 FPR I = i TO 10 : PRINT "TK2000 COLOR" :NEXT 

2) Apague todos os comandos REM do programa. 
Recamendase quardar Lima versSo do programa com os 
REM para facili tar a documentac&o. 

3) Use matrises de numeros inteiros se possivel, no 
lugar de nfimeros reais. 

4) Use variSveis no lugar de constant es. 

5) Mao use no -fim de urn programa o comando END. A 
utilizacSo deste comando nos exemplos utiliaados 
neste manual tinham carater puramente didatica. 

6>> Reuse. se possivel, as mesmas variaveis dentro 
de urn programa„ desde que na'o incorra em 
conflitos de 1 ogica. 

7> Procure criar subrotinas p^r^ areas de programa 
que executarem tare-fas si mi lares. 

8) Use os elementos zero das matrices, como por 
exemplo A<0> , B(0, Y) . 

9) Quando A* = "COL" e rede-finido em A* N "AP" o 
antiga string "COL" na'o e apagado na memoria. 
Usando per i odi camente Lima instrucSo do tipo 
X= FREUiJ) dentro do seu programa o BASIC 
"limpara" antigos conteudos do topo da memoria. 



Agora algumas "dicas" para aumentar a velocidade de 
execuca-o do BASIC; 



1) Use variaveis no lugar de const antes 

2) De-fina as variaveis mais usadas no seu programa 
no inlcio do mesmo, ja que assim diminue o tempo 
de procura. 

3) Use NEXT sem a variavel indice, com i sso o 
processador na'o efetuara a procura. 
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4) Col oque as linhas mais referenciadas do seu 
proqrama no inicio do mesmo. 
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APENDICE D 
CODIGOS DOS COMANDOS 



12S 


END 


129 


FOR 


130 


NEXT 


131 


DATA 


132 


INPUT 


133 


DEL 


134 


DIM 


135 


READ 


136 


GR 


137 


TEXT 


13B 


DSK 


139 


ASS 


140 


CALL 


141 


PLOT 


142 


HLIN 


143 


VLIN 


144 


HGR2 


145 


HGR 


146 


HCOLOR 


147 


HPLOT 


148 


DRAW 


149 


XDRAW 


150 


HTAB 


151 


HOME 


152 


RDT= 


153 


SCALE= 


154 


SHLOAD 


155 


TRACE 


156 


NOTRACE 


157 


NORMAL 


158 


INVERSE 


159 


SOUND 


160 


COLOR 


161 


POP 


162 


VTAB 


163 


HIMEM: 


164 


lomem: 


165 


ONERR 


166 


RESUME 


167 


RECALL 


168 


STORE 


169 


SPEED= 


170 


LET 


171 


GOTO 


172 


RUN 


173 


IF 


174 


RESTORE 


175 


& 


176 


GOSUB 


177 


RETURN 


178 


REM 


179 


STOP 


180 


ON 


181 


WAIT 


182 


LOAD 


183 


SAVE 


184 


DEF 


IBS 


POKE 


186 


PRINT 


187 


CONT 


188 


LIST 


189 


CLEAR 


190 


GET 


191 


NEW 


192 


TAB( 


193 


TO 


194 


FN 


195 


SPC( 


196 


THEN 


197 


AT 


198 


NOT 


199 


STEP 


200 


+ 


201 


- 


202 


# 


203 


/ 


204 


X-. 


205 


AND 


206 


OR 


207 


> 


208 


= 


209 


< 


210 


SON 


211 


TNT 


« 1 *"1 


ABS 


_■" ^ M^ * 


USR 


214 


FREC 


215 


SCRN ( > 


216 


PDL( 


217 


POS 


218 


SQR 


219 


RND 


220 


LOG 


221 


EXP 


222 


COS 


223 


SIN 


224 


TAN 


225 


ATN 


226 


PEEK 


227 


LEN 


228 


STR* 


229 


VAL 


230 


ASC 


231 


CHR* 


232 


LEFT* 


233 


RIGHT* 


234 


MID* 


235 


LM 


236 


MOTOR 


237 


TK2000 


238 


MP 


239 


MA 
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APENDICE E 

PALAVRAS RESERVADAS 

Estas palavras reservadas sKo palavras que o 
reconhece para uso exclusive 



BASIC 



ABS 


AND 


ASC 


ASS 


AT 


ATN 


CALL 


CHR* 


CLEAR 


COLOR 


CONT 


COS 


DATA 


DEF 


DEL 


DIM 


DRAW 


DSK 


& 


END 


EXP 








FN 


FOR 


FRE( 








GET 


GOTO 


GOSUB 


GR 






HCOLDR 


HGR 
HPLOT 


HGR2 

HTAB 


HIMEM: 


HLIN 


HOME 


IF 


INPUT 


INT 


INVERSE 






LEFT* 


LEN 


LET 


LIST 


LN 


LDADA 




LOADT 


LOG 


LOMEM: 






MA 


MID* 


MOTOR 


MP 






NEW 


NEXT 


NORMAL 


NOT 


NOTRACE 




ON 


ONERR 


OR 








FDL < 


PEEK 

PRINT 


PLOT 


POKE 


POP 


POS 


READ 


RECALL 


REM 


RESTORE 


RESUME 


RETURN 




RIGHT* 


RND 


ROT= 


RUN 




SAVEA 


SAVET 


SCALE= 


SCRN ( 


SGN 


SHLOAD 




SIN 


SOUND 


SPC( 


SPEED= 


SQR 




STEP 


STOP 


STORE 


STR* 




TABC 


TAN 
TRACE 


TEXT 


THEN 


TK2000 


TO 



USR 
VAL 
WAIT 
XDRAW 



VLIN 



VTAB 
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APENDICE F 
MAFA DA MEMORIA 



07 FF 
0600 
fFFF 

2000 
3FFF 

4000 



9FFF 

A000 
BFFF 
C0O0 

C0FF 
CI00 

FFFF 



USO DO 

SfSTEMA 

2K 



RAM 



(6KJ 



PRJMEJRA PAG 
VtDEO 8K(RAM) 



RAM (24K) 



SEGUNDA FWG, 
VlOEO 6MRAMJ 



I/O 



ROM 



mapa de memciria (nostra as di-fe- 
rentes funcdes a que -foram dedicadas 
as varias areas disponiveis. 

Os primeiros 2k de RAM s&o de uso 

da si sterna operarional e do BASIC do 

TK-2000 COLOR, assim como os altimos 

MA 16k sHo dedicados as portas de I/O 

(entrada e salda) e a ROM. 

Podemos observar que sobraram 
entres as enderefcis 0800H e BFFFH 
duas areas dedicadas a paginas de 
video. A area restante e livre e 
disponlvel. As paginas de video 
MP contem as in-formacbes que aparecem 
na imagem da sua TV cm monitor. Coma 
s6 uma aparece por vez , pode-se 
selecionar qual del as se deseja no 
momenta, pelo uso dos comandos MA e 
MP. MA selecipna a pagina 
campreendida entre 2000H e 3FFFH, e 
MP seleciona as pagina compreendida 
entre A000H e BFFFH. Ao ligar seu computador e selecionada 
automaticamente a primeira pagina. Se desejar usar so Lima 
pagina de video, a area da outra -fica livre e disponivel 
para o usuario, 

programa em BASIC comeca automaticamente a partir do 
enderetja 0B00H. Se o programa -Foi maior que 6k, existira um 
con-flito com a primeira pagina. de video. Neste caso existem 
duas opcOes: a) digite o comando MP e a area normal mente 
dedicada a primeira pagina de video podera ser usada para o 
programa,, permitindo assim acesso a 39k de RAM. b) De-fina a 
posicSo de inlcio do seu programa a partir do endereco 4000. 
Isto e obtido digitando os seguintes comandos diretos: 

>LuMEM: 16384 
>POKE 103,1 
>POKE 104,64 
>POKE 16384,0 
>NEW 

D comando LQMEM: e usado para de-finir o limite inferior da 
area de variaveis. comando HIMEM: de-fine o limite supe- 
rior. Por exemplo, apos ligar o TK-2000 COLOR digite o 
seguinte comando direto: 

HIMEM: 2060 

Agora tente entrar varies comandos do tipo: 

10 REM 
20 REM 
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e aparecera o comentario de erro: EXCEDE MEMQRIA indicando 
que nao ha mais espatjo na area de programa BASIC. 

£1ap.a de memiria de utiliza£|(g da BASIC 

A memoria disponivel pelo usuario e dividida em varias 
areas pelo BASIC, e cada uma dessas areas e enderefada por 
ponteiros que se situam nos enderespos iniciais da memiria, 
na area de variaveis do sistema. A figura abaixo descreve as 
areas e seus ponteiros. 



$73 
$74 



$6 
$70 



HIMEM: 



* u 



$SD 
$6E 

$66 
$6C 

$69 
$6A 

(_OM£M : 
$AF 

$B0 

$67 
$68 






STRINGS 



MATRfZES N0MEREAS E 
PONTEIROS DE 
MATRIZES STRfNGS 



VARfAVEIS E PONTEIROS 

OE 

STRINGS 



PROGRAMA 



$601 
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CONFIGURACfiO DAS VAR I AVE IS 



Var iaveis Simples 



REAL 


IBYTE 
IPOS.) 


2 BYTES 
IPOS.) 




BYTE MAIS 
SIGNIF. 






BYTE MEMOS 
SIGNIF. 




v v " v " v 

NOME EXPOENTE MANTISSA 


/ 


INTEIRO 


IBYTE 
(NEG.) 


2 BYTES 
(NEG.) 


BYTE MAIS 


BYTEMENOS 
SIGNIF 













* v ' 

NOME 


PONTEIRO 

STRING 


1 BYTE 
(NEG.> 


2 BYTES 

(POS.) 


COMFRI- 
MENTO 


BYTEMEN09BYTE MAIS 
SIGNIF SIGNIF 










i j 




\ i 




m 




NC 


i 
IME 


v ' 
ENDERECO 





Matrizea 



Real 



1 

POS.NEG. 
1 


1 
1 




1 

1 


* * m 


1 


S BYTES 


* ■ » 


5 BYTES 



J\_ 



_rt_ 



v\_ 



NOME OESLOJ-) N? DE TAMANHO 
CAMENTO DIM. OADIM.N 
AO INfCIO 
OA PROX. VAR. 

Intei ro 



TAMANHO REAL 
DA DIM. 1 (0,0,0,... ,0) 



V 



-\ 

REAL 
(N,N,-..,N) 



1 

NEG. NEG. 
1 


1 

1 




— i— 


• •> ■ 


i 

i 


2 BYTES 



NOME DESt-D-f N? DE TAMANHO 

CAMENTO DIM. OA DlMENSAo 
AOlNfClO N 

OA PROX. VAR. 



V V ' 

TAMANHO INTEIRO 
OAOIM.l (0,0,. ~,0) 



2 BYTES 



^~v ' 

fNTEfRO 
IN,N,...,N) 



Ponteiro String 



1 

NEG.P0S. 

1 


1 ' 




— i— 


* ■ i 


— i — 

■ 


3 BYTES 

COMPR. 

+ END. 


* * • 


3 BYTES 
OOMP.+END. 



-v V 

NOME OESLO^ | NP DE TAMANHO 
CAMENTO DIM. OAD1M-N 
AO JNlCIO 
OA PROX.VAR. 



-A. 



TAMANHO STRINGS 
OA OIM.1 (0,0,.. .$) 



' V 

STRING $ 
(N„N,...,N) 
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APENDICE G 
TABELA DE CODIGOS ASCII 



Deci mal 


00 


16 


32 


4B 


64 


80 


Hex 

i" _ 


*00 


*10 


*20 


$30 


$40 


*50 


$0 


nul 


die 







@ 


P 


1 $1 


soh 


del 


j 


1 


A 


G 


2 $2 


st>; 


del 


" 


2 


B 


R 


3 *3 


et>; 


dc3 


# 


■« 


C 


S 


4 *4 


eot 


dc4 


$ 


4 


D 


T 


5 *5 


enq 


nak 


y. 


5 


E 


U 


6 $6 


cAL™ r*. 


syn 


| 


6 


F 


V 


7 *7 


bel 


etb 


? 


7 


G 


W 


8 $8 


bs 


oa.n 


c 


8 


H 


X 


9 *9 


ht 


em 


) 


9 


I 


Y 


10 *A 


14 


sub 


* 


n 

H 


J 


z 


11 *B 


vt 


esc 


+ 


; 


K 


[ 


12 $C 


f f 


f s 


t 


< 


L 


\ 


13 *D 


cr 


gs 




S3 


ti 


] 


14 $E 


BO 


rs 


m 


> 


N 


.•\ 


15 $F 


si 


us 


/ 
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APENDICE H 
OPERACAO EM LIN6UABEM DE MAQUINA 

Este ap£ndice -foi escrito para aqueles que entendem 
programa^Ka em linguagem de maquina. 

Os comandos especl-f i cos para esta utilisa^^to s«to 
mencionados a seguir: 

LM - Acessa o modo MONITOR 

ASS ~ Acessa o modo MINI-ASSEMBLER 

DSK - Com uma unidade de diskete conectada aa 
seu TK-2000 COLOR, este comando e-fetua- 
rA o "boot" do DOS do diskete. 

TK200#-Executa uma rotina em linguagem de 
maquina no endereco $3F8. 

Para maiores detalhes consul te ao Manual Tecnico do TK-2000 
l» uluk 
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APENDICE I 

COMPARACAO COM APPLE II PLUS 

E:;iste um certo grau de campat ibi 1 idade entre o TK— 200!? 
COLOR e o computador APPLE II PLUS e si mi lares nacionais. 
Neste apendice serSo destaradas as di 4 eren^as mais 
importantes. 

a) Diferen^a nos comandos BASIC 








TK-2000 


APPLE 


II 


FLASH 


_ 




Cs 




IN# 


— 




&> 




PRtt 


- 




C 




MA 


C* 




— 




MP 


CS 




- 




ASS 


c 




- 




LM 


V 




- 




TK2000 


Cs 




- 




MOTOR 


CS 




— 




SOUND 


C 




— 




6R,HBR 


{ 1 impa 


s6 


<1 impa 


a) 




a janel 


.a> 


tela) 





Comandos no TK-2000 
com o mesmo codigo 
do APPLE II 

BOUND 

ASS 

DSK 



b> Carregando -fita de APPLE 1 1 no TK-2000 



Para carregar as fitas em APPLESOFT BASIC no TK-2000, 
digite o comando MP e a tela mostrara um padra"o de barras 
similar aquele que aparece ao ligar o aparelho. 

Nesta posi^So pade-se tambem di gitar o comando HOME para 
limpar a tela tornando agora possivel carregar um programa 
gerado num APPLE II ou compativel no TK-2000 COLOR atraves do 
comando LOADA. 

Se o programa na"o executar corretamente, deve se 

procurar a soluca'o para o erro observando o mapa d& memoria, 
ou conferinda no programa se nSo existem chamadas de 
subrotinas da ROM que passuem enderecos diferentes no TK-2000 
e no APPLE II ou similar. 



Caso ao ewecutar o programa, este seja interrompido com 
a mensagem ds ERRO DE SINTAXE, provavel mente este ocorreu 
devido a um comando (FLASH, IN# ou PR#) que e>:istia no APPLE 



(incompati vel ao TK-2000) , e devera ser removido 
substituido apropri adamente de acordo ao contexto. 



ou 
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c) Di-feren^as no uso da RAM ocupado pelo video 



TEXTD pagina 
TEXTO pagina 
BAIXA RES pag 
BAIXA RES pag 
ALTA RES pag 
ALT A RES pag 



TK-2000 



2000-3FFFH 
A000-BFFFH 
2000-3FFFH 
A000-BFFFH 
2000-3FFFH 
A000-BFFFH 



APPLE II 



400-7FFH 
800-BFFH 
400-7FFH 
S00-BFFH 
2000-3FFFH 
4000-5FFFH 
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INDICE ALFABETICQ 

ABS, 154 
APPLE II, 205 
Arredondamento, 53 
ASC, 1(36-107 
ASCII 

codigos, 105-106,201 
ASS, 203 
ATN, 155 
BASIC, 17 

Cadeia (String), 51,77 
CALL, 163-173 Veja tambem USR 
Caracteres Gra-ficos, 24 
Cassettes, 27 

regulando a volume, 29 

guardando programas no, 84-85 

lendo memoria a partir do, 84-85 

manuseio, 27 

prote<ja"o contra grava^&o, 28 
CHR$, 107 
CLEAR, 92 

Codigos de comandos, 193 
COLOR, 127 
Condi cionai s, 137 
CQNT, S5-B7 
CONTROL, 25 

C, 58-59, 87-88 

Q, 44 

S, 43 

X, 72, 93 
CONTROL-SHIFT, 25 
COS, 150 
Cursor, 22 

determina^So da posic&o horizontal, 90 

determina^a-o da posica-Q vertical, 90 

movimentaca"o, 26 
DATA, 117-122 

Declaraca*o de atribuica-o, 55 
DeclaracSo PRINT, 41 

abreviada, 43 

pontos e vlrgulas em, 42-49 

SPC em, 91 

TAB em, 90 

vlrgulas em, 42 
DEF FN, 123 
DEL, 72 

Depuraca*o de programas, 88 
DIM, 110 

Dois pontos <:), 49 
DRAW, 167 

Economi a de espaco e tempo, 191 
Ed if: Ho, 72 

eliminando linhas, 72 

trocando caracteres, 73 
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el i minartdo caracteres, 74 
eliminando linhas, 74 
END, 43 
Erros 

cddigos dos, 189 
corrigindo, 144 
mensagens de, 187-188 
EXP, 155 
FN, 123 
FOR, 65-72 
FRE, 93 

FuncSes Tr i gonom&tricas, 191 
GET, 122 
G05UB. 141 
GOTO, 57 
GR, 127 
Gra-ficos,, 151 

alta resolu;3(a, 159-163 
bai>:a resolu^to, 127-129 
caracteres, 24, 151 
HCDLOR, 130 
HGR , 1 30 
HGR2, 134 
HIMEM:, 174 
HLIN, *129 
HOME, 43 
HPLOT, 130-133 
HTAB, 90 
IF-THEN, 137-138 
INFUT, 59-63 
INVERSE, 93 
INT, 83 
LEFT*, 78 
LEN, 77 
LET, 55 
LIST, 45 
LM, 163 
LOADA, 84-85 
LGADT, 30, 84-85 
LOG, 156 
LDNEM: , 174 
Matrizes, 108 

Unidimensionais, 111 
Bidimensionais, 112 
Tridi mensionais, 113 
Memoria, 13 

acesso direto via BASIC, 173 
apenas leitura (ROM), 164 
enderecamento, 164 
mapas, 197-198 
MID*, 80 
MOD, 186 

Modo imediato, 35 
Modo programado, 44 
Monitor, 163 
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acessando, 163 

guardando, 164 

lendo diretamente do, 165 

saindo, 166 
NEXT, 65 
NEW , 4 1 
NOTRACE, BB 
NORMAL, 93 

Notafa'o cient 1-f ica, 52, 99 
N&meros 

em natasa'a cienti -F ica, .52, 99 

inteiras, 52 

reais, 52 
Nftmero aleatfirio, 82 
NQmero de linha, 44 

como endere<?o, 164 
NCimeros he^adeci mai b, 162 
ON-GOSUB, 143 
ON-GOTO, 139 
ONERR GOTO, 144 

rotina de mani pul at;a*o de erros, 144 
Operates lftgicas, 1(21 
Qperaffles comparati vas, 99 
F'alavras reservadas, 195 
PEEK , 89 
PLOT, 127 
POKE , 89 

F'onto e virgula, 42-49 
POP, 145 
PQS, 911 
PRINT, 41 
RAM, 14 
READ, 117-122 
RECALL, 113-114 
REM, 63 
REPEAT, 27 
RESET, 26, B7-88 
RESTORE, 121 
RETURN, 141 
RETURN (TECLA), 25 
RISHT*79 
ROM, 13 
ROT, 168 
RND, 82, 153 
RUN, 44 
Sal das 

alinhando valores num&ricos, 41 

cadeias, 103 
SAVE A, B4-85 
SAVET, 84-85 
SCALE, 168 
SCRN, 129 
SGN, 155 
SHIFT, 22 
SHLOAD, 165, 16? 
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SIN, 149 

SOUND, 177-1B1 

SPC, 91 

SPEED, 93 

SG!R. 38, 156 

STOP, B5-B7 

STORE, 113,114 

STR*, 103 

Sub— roti nas, 141 

TAB, 90 

Tabelas de -figuras, 164 

TAN, 150 

Teclado, 22-27 

TEXT, 127-130 

TK2000, 203 

TRACE, 88 

USR, 174 

VAL, 105 

Variaveis, 54, 97 

inteiras, 54, 97 
reais, 54, , 88 

Video- mapas, 206 

Vlrgulas, 42 

VLIN, 129 

VTAB, 90 

WAIT, 173 

XDRAW, 167 
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